##script homepage.pl #this script has been located in cgi folder where
+ it also has SUBS/APP folder
package homepage;
our ($AUTOLOAD_DEFINED); # This isn't necessary, but without it you ge
+t a warning when perl uses UNIVERSAL::AUTOLOAD
if (!$AUTOLOAD_DEFINED) # (from lib.pl): "Use of inherited AUTOLOAD f
+or non-method...". (search for that warning
{ # text in 'perldoc perldiag' for more info.
*AUTOLOAD = \&APP::AUTOLOAD;
$AUTOLOAD_DEFINED = 1;
}
#
#
#below is the non-method called from the perl file (getStatuses.pl) lo
+cated at cgi/SUBS/APP/Statues
@Statuses = &APP::Statuses::getStatuses({IsResolvedFlag =>1}); #here
+ is is failing to autoload the script getStatuses.pl.
In other script (lib.pl) where AUTOLOAD function is defined which would control the autoloading part, it also has below line outside of AUTOLOAD function
# use APP package's AUTOLOAD for all packages that don't have their ow
+n
*UNIVERSAL::AUTOLOAD = \&APP::AUTOLOAD;
Note : I cant see anywhere autoLoader module has been used instead AUTOLOAD function has been written.
I hope this helps you to understand the scenario.
Thank you
|