Select Code to Download

use strict;
use warnings;
...
require $file or die "require() failed\n";

unlink $file or die "Can't delete file '$file': $!: $^E\n";

$VAR1 = sub { "DUMMY" };