rodd has asked for the wisdom of the Perl Monks concerning the following question:

Howdy Monks,

I'm looking for a RACF PassTicket generation script in Perl. Does anyone have one to share?

The PassTicket is a one-use-only password generator for accessing the IBM Mainframe using RACF security from distributed environments. There is an article and example REXX script for Windows here: http://www.os390-mvs.freesurf.fr/passtkt.htm.

My problem is that I need to access the Mainframe with FTP from AIX and not have to store a password for my Mainframe user. A while ago, I've used an executable called "racxtk" for AIX, apparently it was a C program compiled by the security people at a customer site I was, but I was not allowed access to the source. Now I'm somewhere else and would need something similar (in perl, preferebly :).

Any light on the subject will be appreciated.

--rodrigo

Replies are listed 'Best First'.
Re: RACF PassTicket
by dHarry (Abbot) on Mar 27, 2009 at 12:32 UTC

    I know of no such thing in Perl. You're more likely to find a piece of C-code that does the trick. I guess you already looked at the racf downloads. You can also ask questions there. If you use RACF in combination with a directory server it might be as "simple" as getting the info through a LDAP service. Perl does have several modules for that on CPAN.

    HTH
    dHarry