my @columns = @{$self->{columns}};
foreach (@{$self->{columns}}) {print qq{self->col: $_\n};} # prints the 3 columns
foreach (@columns) {print qq{col: $_\n};} #prints 3

Why?

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to