You want use base 'AGENT'; or something like @TOOLS::ISA = ('AGENT');
use AGENT; on its own just loads (if necessary) and imports from (if any exports exist in) AGENT.
Update: Yikes, that's @ISA, not @isa, of course.
print "Just another Perl ${\(trickster and hacker)},"
The Sidhekin proves Sidhe did it!
In reply to Re: How to do basic inheritance in Perl OO?
by Sidhekin
in thread How to do basic inheritance in Perl OO?
by opensourcer
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |