cpan install MVS::JESFTP failed

[deanb2]

I need to submit JCL to a z/OS system and retrieve the job output. I found the MVS::JESFTP package and attempted to install it using cpan. Does anyone recommend this or another package to accomplish this?

cpan[1]> install MVS::JESFTP
Reading '/root/.cpan/Metadata'
  Database was generated on Tue, 10 Jul 2018 09:41:03 GMT
Running install for module 'MVS::JESFTP'
Checksum for /root/.cpan/sources/authors/id/M/MI/MIKEO/MVS-JESFTP-1.1.
+tar.gz ok
Scanning cache /root/.cpan/build for sizes
......................................................................
+......DONE
Configuring M/MI/MIKEO/MVS-JESFTP-1.1.tar.gz with Makefile.PL
Checking if your kit is complete...
Looks good
Generating a Unix-style Makefile
Writing Makefile for MVS::JESFTP
Writing MYMETA.yml and MYMETA.json
  MIKEO/MVS-JESFTP-1.1.tar.gz
  /usr/bin/perl Makefile.PL -- OK
Running make for M/MI/MIKEO/MVS-JESFTP-1.1.tar.gz
cp JESFTP.pm blib/lib/MVS/JESFTP.pm
Manifying 1 pod document
  MIKEO/MVS-JESFTP-1.1.tar.gz
  /bin/make -- OK
Running make test
PERL_DL_NONLAZY=1 "/usr/bin/perl" "-Iblib/lib" "-Iblib/arch" test.pl
1..7
ok 1
not ok 2
make: *** [test_dynamic] Error 111
  MIKEO/MVS-JESFTP-1.1.tar.gz
  /bin/make test -- NOT OK
//hint// to see the cpan-testers results for installing this module, t
+ry:
  reports MIKEO/MVS-JESFTP-1.1.tar.gz
Failed during this command:
 MIKEO/MVS-JESFTP-1.1.tar.gz                  : make_test NO

Any ideas on what the error is? Would you recommend that I force install this package?

I'm running on CentOS

      Operating System: CentOS Linux 7 (Core)
           CPE OS Name: cpe:/o:centos:centos:7
                Kernel: Linux 3.10.0-514.el7.x86_64
          Architecture: x86-64

with perl:

This is perl 5, version 16, subversion 3 (v5.16.3) built for x86_64-li
+nux-thread-multi
(with 33 registered patches, see perl -V for more detail)

Thank you!

[Corion]

If you want to see more verbose error output, try the following:

cpan[1]> look MVS::JESFTP
perl Makefile.PL
make
make test

Looking at the source code of the failing test, it dies because it can't connect to an (old, old) machine:

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";

So, maybe the module works ,but it's just the tests that are bad... If you edit that test and supply better credentials, maybe it passes its test suite.

Looking at its source, it's just a thin wrapper around Net::FTP, so if you feel uncomfortable with using a module that fails its tests, reimplementing the functionality from reading its source should get you just as far.

[deanb2]

Appreciate your response. I'm a novice with Linux and Perl; editing the tests is well beyond my comfort level, especially with pressure from my company and client to get something working now. I will come back to this to try editing the tests or maybe force the install.

[marto]

Welcome! Sadly this module has zero passing builds, likely because the tests aren't going to work out of the box:

######################### End of black magic.
 
# Insert your test code below (better if it prints "ok 13"
# (correspondingly "not ok 13") depending on the success of chunk 13
# of the test code):
 
 
# modify these variables for your installation; also modify TEST.SEQ
# as needed.
 
my($host, $logonid, $password, $job, $jobname) =
    ('nmgsdisd.state.nm.us', 'DPMIKE', 'JTREE', './TEST.SEQ', 'DPMIKE1
+'

The module is from 2003, nmgsdisd.state.nm.us is not accessible now, perhaps it never was and the author intended you to change these values prior to installation, as specified in the README. I don't know an alternative solution for JCL, besides suggesting a Super Search here or of metacpan.