The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

UNIVERSAL::canAUTOLOAD - installs a UNIVERSAL::can that respects AUTOLOAD subs

SYNOPSIS

 use UNIVERSAL::canAUTOLOAD;

 package MyModule;

 sub DESTROY {}
 sub AUTOLOAD {
     our $AUTOLOAD;
     print "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.

SEE ALSO

"can" in UNIVERSAL