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

Missing comma after first argument to die function at perl.pl line 135, near "$filename or"
Execution of qdepot_upload.pl aborted due to compilation errors.