use Net::SSH::Perl; 
$host = "somehost"; 
my $ssh = Net::SSH::Perl->new($host, 
                               protocol => '2', 
                               debug => 1, 
                               privileged => 0); 

#  THIS FAILS, WORKED FINE BEFORE 
#my $cmd = "perl -e '".`cat ./cm-unix.pl`."'"; 
#   THIS IS JUST A ONE LINE FILE with 'ls-l' THAT FAILS 
my $cmd = `cat GO`; 
# WORKS FINE 
my $cmd = 'cd /tmp; ls -l'; 


$ssh->login( $ENV{USER} ); 
my($stdout, $stderr, $exit) = $ssh->cmd($cmd);