...
use strict;
use Net::SSH::W32Perl;

my $host = "...";
my $user = "...";
my $pass = "...";

my $ssh = Net::SSH::W32Perl->new($host);
$ssh->login($user,$pass);