Help for this page

Select Code to Download

Select or download this

for my $target (@array) {
    print "Trying to store [$target]\n";
};

Select or download this

for my $target (@array) {
    $target =~ s/\s+$//;
    print "Storing [$target]\n";
    $ftp->put( $target );
};