in reply to
I wouldn't name an input file "OUTPUTFILE", but that doesn't disturb perl.
The seek seeks from EOF, so negative offset is OK, if the file is longer than 500 bytes, so error checking would be better.
However, you are opening OUTPUTFILE and then seeking on CONFIRMEDOUTPUTFILE...
Priority 1, Priority 2, Priority 3
Priority 1, Priority 0, Priority -1
Urgent, important, favour
Data loss, bug, enhancement
Out of scope, out of budget, out of line
Family, friends, work
Impossible, inconceivable, implemented
Results (275 votes),