my($host, $logonid, $password, $job, $jobname) =
    ('nmgsdisd.state.nm.us', 'DPMIKE', 'JTREE', './TEST.SEQ', 'DPMIKE1');

$jes = MVS::JESFTP->open($host, $logonid, $password) or die "not ok 2\n";