http://www.perlmonks.org?node_id=740662


in reply to autoload usage

For your Reference 

use strict;
use warnings;


testing("ARG1");


sub AUTOLOAD
{
    my $pg = our $AUTOLOAD;
    print "Function Name ->$pg<-\n";
    print "Arguments ". join "\n", @_;
}

[download]

Output will be:
Function Name ->main::testing<-
Arguments ARG1

In Section Seekers of Perl Wisdom