my $filename = q{deletefiles.txt};
       chmod 0777, $filename or $!{ENOENT} or die $!;
       open my $OUTPUT, q{+>}, $filename or die $!;