In addition to what the others said, I'll point out that unlink fails silently if the file does not exist, so all you really need is     unlink $new_file;

jdporter
The 6th Rule of Perl Club is -- There is no Rule #6.