Help for this page
my $ssh = Net::SSH::Any->new($hostname, user => $user, key_path => "/h +ome/$user/.ssh/id_dsa"); if ($ssh->error) { ... say "The files and directories of $username on $hostname are given + below"; say "@out"; }