Stas Bekman wrote:
[...]
> package ModPerl::EasyLife;
> use ModPerl::MethodLookup;
> sub my_AUTOLOAD {
> my($hint, @modules) =
> ModPerl::MethodLookup::lookup_method($UNIVERSAL::AUTOLOAD, @_);copy-n-paste typo: s/UNIVERSAL:://; of course
> if (@modules) {
> eval "require $_" for @modules;
> goto &$AUTOLOAD;
> }
> else {
> die $hint;
> }
> }
__________________________________________________________________
Stas Bekman JAm_pH ------> Just Another mod_perl Hacker
http://stason.org/ mod_perl Guide ---> http://perl.apache.org
mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com
http://modperlbook.org http://apache.org http://ticketmaster.com
--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
