Select Code to Download

my $test_file = 'file_of_doom';
die 'file already exists' if -e $test_file;
...
unlink %foo;

print "file gone!\n" if ! -e $test_file;