You should check the value of the first open and abort that file if it fails:

open FILE, $file or next;
[download]

Otherwise, if the first open fails and the second is successful, the file will be emptied out (i.e. erased). Ouch!