use Data::Dumper;
...
sub AUTOLOAD {
    my $self = shift;
    warn $AUTOLOAD;
    warn Dumper \$self;    
};