in reply to how to goto &sysread ?
Update: Fixed awkward language and &AUTOLOADpackage Foo; use AutoLoader 'AUTOLOADER'; package Bar; use AutoLoader; AUTOLOAD(); print "OK...Done!\n" unless $@; __END__ sub AUTOLOAD { $AutoLoader::AUTOLOAD = "CORE::sysread", goto \&AutoLoader::AUTOLOAD; }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: how to goto &sysread ?
by ikegami (Patriarch) on Jul 25, 2011 at 01:37 UTC |