use Devel::Peek; my $f = (0 != 0); my $e = q(); Dump($f); Dump($e);