Select Code to Download

open my $fh, "<", $file_name or die "can't open file: $!";
   while(<$fh>){
...
    ...
   }
 ...