RE: Perl on mainframes

Krishnan, Prashanth \(Cognizant\) Mon, 14 Mar 2005 00:49:19 -0800

Title: Message

Hi,

Thanks a lot for the help. I have one more question, if have a perl program in let's say in U101848.PERL.PGMS and I want to execute the perl program in this PDS. Will I be able to use JCL (of course doing the necessary modification) given below to execute it?. Also it would great if you could let me know where I can find the perl installable for the mainframes.

Regards

Prashanth K

-----Original Message-----
From: John Goodyear [mailto:[EMAIL PROTECTED]
Sent: Thursday, March 10, 2005 7:54 PM
To: Schwartz, Peter (IT)
Cc: [email protected]; Krishnan, Prashanth (Cognizant)
Subject: RE: Perl on mainframes

Optionally, you can put your Perl script in a HFS/ZFS and invoke it from a Unix Services shell just like you would do on a Unix/Windows environment.

John Goodyear
ATS Benchmarking Team
Gaithersburg, MD.

"Schwartz, Peter \(IT\)" <[EMAIL PROTECTED]>

03/10/2005 09:13 AM

To	"Krishnan, Prashanth \(Cognizant\)" <[EMAIL PROTECTED]>, <[email protected]>
cc
Subject	RE: Perl on mainframes

Here is some sample JCL I used. The perl code was kept in my directory in USS in the mainframe.

//******************************************************************
//* RUN PERL SCRIPT TO SPLIT OUT REPORT INTO HFS DIRECTORY STRUCTURE
//******************************************************************
//S05 EXEC PGM=BPXBATCH,REGION=6M,
// PARM='SH /u/m39997/perl /u/m39997/splitter -e TEST -
// -i MSTEST.HF374D5.MINICOOL.SORT1'
//STEPLIB DD DSN=SYS1.CEE.SCEERUN,DISP=SHR
//SYSIN DD *
DSN=MSTEST.HF374D5.MQMSGS
/*
//*PATH=/bin:.:/usr/lpp/java/J1.1/bin:/usr/local/bin:/u/m39997/bin
//STDOUT DD PATH='/u/m39997/out',
// PATHOPTS=(OCREAT,OTRUNC,OWRONLY),PATHMODE=SIRWXU
//STDERR DD PATH='/u/m39997/error',
// PATHOPTS=(OCREAT,OTRUNC,OWRONLY),PATHMODE=SIRWXU
//*
//*********************************************************************
//* COPY STDOUT/STDERR TO JESLOG *
//*********************************************************************
//HFSOUT EXEC PGM=IKJEFT01
//OUT DD PATH='/u/m39997/out',PATHOPTS=ORDONLY,PATHDISP=DELETE
//ERR DD PATH='/u/m39997/error',PATHOPTS=ORDONLY,PATHDISP=DELETE
//STDOUT DD SYSOUT=*,DCB=(RECFM=V,LRECL=256)
//STDERR DD SYSOUT=*,DCB=(RECFM=V,LRECL=256)
//SYSTSPRT DD DUMMY
//SYSTSIN DD *
OCOPY INDD(OUT) OUTDD(STDOUT)
OCOPY INDD(ERR) OUTDD(STDERR)
/*
//*---------------------------------------------------------------
//S11A EXEC PGM=WTOABEND,PARM=0016,COND=(0,EQ,S05)
//*---------------------------------------------------------------

From: Krishnan, Prashanth (Cognizant) [mailto:[EMAIL PROTECTED]
Sent: Thursday, March 10, 2005 1:47 AM
To: [email protected]
Subject: Perl on mainframes

Dear all,

Can anyone tell me how to execute a perl program in mainframe. I have written a perl program in a PDS now I need to execute it, could somebody tell me what are steps involved in executing this perl program. Do I need to have a JCL for this or can I execute it in TSO region. Please help me out on this.

Regards,
Prashanth K

This e-mail and any files transmitted with it are for the sole use of the intended recipient(s) and may contain confidential and privileged information.
If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message.
Any unauthorised review, use, disclosure, dissemination, forwarding, printing or copying of this email or any action taken in reliance on this e-mail is strictly
prohibited and may be unlawful.

Visit us at http://www.cognizant.com

NOTICE: If received in error, please destroy and notify sender. Sender does not waive confidentiality or privilege, and use is prohibited.

RE: Perl on mainframes

Reply via email to