Select Code to Download

sub Eater::DESTROY { eval { 1 }; };
my $ok = eval {
...
};
warn "OK: [$ok]";
warn "\$\@: [$@]";