use Data::Dumper;

...

print Dumper($j);