wannymahoots has asked for the wisdom of the Perl Monks concerning the following question:
Output:{ package Test; our $AUTOLOAD; sub new { my ($class) = @_; return bless {arr => [1,2,3,4]}, $class; } sub len { my ($self) = @_; scaler(@{$self->arr}); } sub DESTROY {} sub AUTOLOAD { my ($self) = @_; (my $f = $AUTOLOAD) =~ s/.+://; print "function \"$f\" called\n"; $self->{$f}; } } my $tmp = Test->new; print $tmp->len,"\n";
function "arr" called function "scaler" called Can't use string ("1") as a HASH ref while "strict refs" in use at ./t +est.pl line 25.
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Method to calculate array length
by toolic (Bishop) on Nov 21, 2012 at 13:40 UTC | |
|
Re: Method to calculate array length (scalar is scalar)
by Anonymous Monk on Nov 21, 2012 at 13:30 UTC | |
by wannymahoots (Novice) on Nov 21, 2012 at 13:36 UTC | |
by rovf (Priest) on Nov 21, 2012 at 15:23 UTC |