#!usr/bin/perl
use strict;
use Net::SSH::Perl;
my $host = "abcd.xyx.net";
my $ssh = Net::SSH::Perl->new($host);
my $username = "xyzuser";
my $password = "xyz2017";
my $cmd = "/bin/ls";
$ssh->login($username, $password);
$ssh->cmd($cmd);