Select Code to Download

#!/usr/bin/perl
use strict;
...
eval { die "foo lives here" };

print "got here\n";

bar lives here at testme line 7.
got here