use Devel::Peek;
Dump $j;