use Data::Dumper;
my $mod = new WIDX; # ok...it works... maybe...
print Data::Dumper->Dump([ $mod ], qw([ *mod ]) );