my $output = qx( ssh $remote_machine $command ); 
my $retval = $? >> 8;