Select Code to Download

#!/usr/bin/perl
use Modern::Perl;
...
my $ssh = Net::SSH::Any->new ($host, user => $user, password => $passw
+d);
my @output = $ssh->capture2("ls -l");
say "@output";

Use of uninitialized value $output[0] in join or string at anyping.pl 
+line 10.