Select Code to Download

open(FILE, "< filename") or die "filename: $!";
{
...
}
close(FILE);
eval;

do "filename" or die "filename: $! ($@)";