in reply to Re^4: Skipping the middle man & the SUPER gotcha
in thread Skipping the middle man & the SUPER gotcha
From further down in that same doc...use strict; use Class::Prototyped ':EZACCESS'; my $Dad = Class::Prototyped->new( hello => sub { print "Hiya from $Dad!\n" } ); my $Me = Class::Prototyped::new( 'parent*' => $Dad hello => sub { # ??? print "I'm just a WILD AND CRAZY GUY!\n"; } );
The "hello!" here is the same as [qw(hello METHOD superable)]'hello!' => sub { my $self = shift; my $mirror = $self->reflect; $mirror->super(@args_to_dad_hello); my code here; }
-- Randal L. Schwartz, Perl hacker
Be sure to read my standard disclaimer if this is a reply.
|
|---|