use Net::OpenSSH;
$s = Net::OpenSSH->new($WLS, master_opts => [-o => 'StrictHostKeyChecking=no']);
$s->system('./script_to_call.pl', $OldTime, $NewTime, "$WLSP/CDSServer11.log");