my $host = "hostname";
my $ssh = Net::SSH::Perl->new($host);
$ssh->login();
my($out, $err, $exit) = $ssh->cmd("./directory/shellscript.sh");