Select Code to Download

my @ftpFiles =$ftp->ls ();                                            
+                                                       
my $i = 0;
...
    $myfile = $file; # <= your original code probably does not do what
+ you want
    }
$ftp->quit ();