Hi, my code looks below, please ignore previous comment

##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.
[download]

# use APP package's AUTOLOAD for all packages that don't have their ow
+n
*UNIVERSAL::AUTOLOAD = \&APP::AUTOLOAD;
[download]

Sorry I don't know how to reproduce an example with this information ... maybe someone else.

Cheers Rolf
_{(addicted to the Perl Programming Language :)
Wikisyntax for the Monastery}

Below is the code to reproduce the error.



package Homepage;

use strict;
use warnings;
use diagnostics;

require "MRlib.pl";  #this script has logic for AUTOLOAD written, wher
+e it checks for main package and method name and call for require<br/
+>
## Upon using below require it works, otherwise, it throws Use of inhe
+rited AUTOLOAD for non-method FP::Introduction::Introduce() is no lon
+ger allowed at test_autoload.pl line 17. error

## require "C:\\Users\\xxx\\Documents\\Application\\Perl_upgrade\\test
+_autoload\\SUBS\\App\\Introduction.pl";

BEGIN {
    
    *AUTOLOAD = \&FP::AUTOLOAD;
}

print "I started the program\n";

#Below Introduce sub is written in "C:\\Users\\xxx\\Documents\\Applica
+tion\\Perl_upgrade\\test_autoload\\SUBS\\App\\Introduction.pl" script

&FP::Introduction::Introduce;    
print "I got to the end of the program\n";


1;
[download]



I hope it makes sense now !
Thank you