> > If so, in my > > constructor, how do I explicitly call the parent constructor? > > package Bar; > > @ISA = qw/Foo/; > > sub new { > my $class = shift; > bless Foo->new(@_), $class; > }
Wouldn't you want this instead? package Bar; @ISA = qw/Foo/; sub new { my $s = shift; my $class = ref($s) || $s; my $self = $class->SUPER::new(); bless $self, $class; return $self; } -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>