Select Code to Download

my $result = eval $param;
die "eval failed: $@" unless defined $result;
print $result;