Select Code to Download

### Back up the file, if it exists
use File::Copy;
...
}

### Copy the database

if(-e $file{1}) # if the file exists
{
...
   print FILE2 $filecontents;
   close FILE2;
}