chmod 0777 deletefiles.txt;
      open(my $OUTPUT, '+>', "deletefiles.txt") or die $!;