NAME
UNIVERSAL::canAUTOLOAD - installs a UNIVERSAL::can that respects AUTOLOAD subs
SYNOPSIS
package
MyModule;
sub
DESTROY {}
sub
AUTOLOAD {
our
$AUTOLOAD
;
"in AUTOLOAD for $AUTOLOAD\n"
;
}
my
$object
=
bless
{},
'MyModule'
;
my
$method
=
$object
->can(
'potato'
);
# returns a true value
$object
->
$method
();
# call the AUTOLOADed potato method
DESCRIPTION
Ever flying in the face of common sense, this module makes a special effort to make a section of "can" in UNIVERSAL false.
For discussion of this need, consult this thread:
http://london.pm.org/pipermail/london.pm/Week-of-Mon-20031020/022190.html
AUTHOR
Richard Clamp <richardc@unixbeard.net> original need and anticipated documentation from Mark Fowler.
COPYRIGHT
Copyright (C) 2003 Richard Clamp. All Rights Reserved.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.