Don't you need to dereference self?
my %loc_array = %{ $self };
or just use Data::Dumper?
use Data::Dumper;
print $self;
On Mon, Oct 5, 2009 at 12:21 PM, Steve Cookson <[email protected]>wrote:
> Hi All,
>
> Is there some way I can cycle through the object model of the object
> we all know and love as '$self'?
>
> I've tried using:
>
> my %loc_array = $self;
> while ( (my $k,my $v) = each %loc_array ) {
> print "$k => $v\n";
> }
>
> But I just get one entry. Does anyone have any other ideas?
>
> Regards
>
> Steve
>
> WX : 2.8.7 (I think)
> OS : XP SP3
> COMPILER: wxPerl
>
>
