use Net::SSH qw(sshopen2);

my $user = "metrica";
my $host = "1em0n5";
my $cmd = "ls";

sshopen2("$user\@155.226.201.96", *READER, *WRITER, "$cmd") || die "ssh: $!";

##</code><code>##

C:\Documents and Settings\guest\Desktop>'ssh' is not recognized as an internal
 or external command,
operable program or batch file.