#!/usr/local/bin/perl
use Net::OpenSSH;
my $remoteserver='nms4';
my $remoteuser='tftp';
my $ssh = Net::OpenSSH->new('$remotehost', user => '$remoteuser', strict_mode => 0);

##</code><code>##

Couldn't establish SSH connection: ctl_dir /home/tftp/.libnet-openssh-perl/ is not secure at /usr/local/bin/engsql01_backup line 36

##</code><code>##

drwx------   2 tftp     nobody       512 Jun 29 14:15 /home/tftp/.libnet-openssh-perl