Select Code to Download

use warnings;
use strict;
...
};
print "<$@>\n";  # Where's the kaboom? There was supposed
                 # to be an earth-shattering kaboom!

my $status;
eval '$status = 3+4; 1' or warn $@||"unknown error";