Select Code to Download

...
use File::Basename;
my $file = fileparse($path);
$scp->scp($path, "$remote->{user}\@$remote->{host}:$destination/$file"
+);

use Net::OpenSSH::Parallel;

...
for my $host (keys %$remotehosts) {
  $pssh->get_error($host) and print STDERR "Unable to copy file $path 
+to $host"
}