What does -> mean in the PERL Programming language?

EG


while ($pointer_apps = $sth_apps-%26gt;fetchrow_hashref) {


$APP_NOTE_KEY = $pointer_apps-%26gt;{'APP_NOTE_KEY'};


$APP_NOTE_SERIES = $pointer_apps-%26gt;{'APP_NOTE_SERIES'};


$APP_NOTE_POSITION = $pointer_apps-%26gt;{'APP_NOTE_POSITION'};


$APP_NOTE_NAME = $pointer_apps-%26gt;{'APP_NOTE_NAME'};


$APP_NOTE_FILENAME = $pointer_apps-%26gt;{'APP_NOTE_FILENAME'};


$APP_NOTE_TYPE = $pointer_apps-%26gt;{'APP_NOTE_TYPE'};


$APP_NOTE_EXT = $pointer_apps-%26gt;{'APP_NOTE_EXT'};


$APP_NOTE_RESTRICTED = $pointer_apps-%26gt;{'APP_NOTE_RESTRICTED'};


#if($APP_NOTE_SERIES eq $app_file){


$app_note_list = $app_note_list . $APP_NOTE_NAME . "^" . $APP_NOTE_FILENAME . "^" . $APP_NOTE_EXT . "^" . $APP_NOTE_SERIES . "^" . $APP_NOTE_POSITION . "^" . $APP_NOTE_TYPE . "^" . $APP_NOTE_RESTRICTED . "^" . $APP_NOTE_KEY . "|";


#}


}

What does -%26gt; mean in the PERL Programming language?
-%26gt; is the in-place dereference operator. It is most commonly used in OOP.





$a-%26gt;{'b'} is exactly the same as $$a{'b'}





-%26gt; can also be used for 'method' calls with blessed objects.


$a-%26gt;function(); is exactly the same as module::function($a);





An 'object' is Perl is actually just a reference to a variable, usually a hash (associative array). As such, whenever you want to use an object, you have to dereference it (othewise perl doesn't know what to do).





See the following in perldoc:


http://perldoc.perl.org/perlop.html - Perl operators


http://perldoc.perl.org/perlref.html - Perl references


http://perldoc.perl.org/perlobj.html - Perl objects


http://perldoc.perl.org/perlmod.html - Perl modules
Reply:It is a push symbol... you are pushin a value in

wedding song