So you ai'nt up on your perl data/ref syntaxt , that's ok (you can still get by), but what I'm wondering is why you haven't tried the greatest diagnostic technique known to man?

use Data::Dumper qw( Dumper DumperX ); # I prefer X
## line 42 "My.pm"
die DumperX $obj;
[download]

Data::Dumper
http://search.cpan.org/doc/GSAR/Data-Dumper-2.101/Dumper.html
DumperX
Identical to the Dumper() function above, but this calls the XSUB implementation. Only available if you were able to compile and install the XSUB extensions in Data::Dumper.

 

______crazyinsomniac_____________________________ Of all the things I've lost, I miss my mind the most. perl -e "$q=$_;map({chr unpack qq;H*;,$_}split(q;;,q*H*));print;$q/$q;"