&remove;
my $x = "perl $death $FAILS"; print $x;
my $rc = system("perl $death $FAILS");
file_present('death is a failure');