use Devel::Peek;
$foo = *foo;
Dump($foo);