Help for this page

Select Code to Download


  1. or download this
    the-calling-subroutine-name
main, directory/program.pl,line,main::the-calling-subroutine-name
  2. or download this
    #works fine
sub addem{
...
        print join(':',caller);     
#       ($package, $filename, $line)=caller; 
        }
  3. or download this
    #notice disablement of the blocks in the callingfun() makes it work
sub addem{
...
#sub callingfun{
       $result = addem(2,2);
#       }