in reply to How to do basic inheritance in Perl OO?

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!