Select Code to Download

if(-f $path_to_file){
   #do something
}

use strict;
use File::Find;
...
        copy($_,  $path.'/'.$Trg.'/'.$File::Find::dir.'/'.$_) if(! -d 
+$File::Find::name);
    }
}