I am using a few TSO commands in my Perl script.

When I let the output from my script go to the terminal it comes out on the
terminal in the order that it is producted.
When I redirect the output to a file all the TSO ouput is at the top, and my
print statements follow in order. 

Is this an error in Perl on MVS or in the UNIX Shell on MVS?

Thanks,
Beth Rice


Samples:  

Output on screen when invoking Perl script that includes some TSO commands:

SYSM $

SYSM $

SYSM $ perl -w olaplog.pl

line from loglist files is /SYSM/homedirs/id03l/scripts/olapisvr.log:earice
rjcartee:olapamf                               
 

log path is /SYSM/homedirs/id03l/scripts

log file is olapisvr.log

dsn hlq is  olapamf

emailid is earice rjcartee

allocate dataset('id03l.olapamf.olapisvr.log.Fri') new unit(vtape)
lrecl(32756) blksize(32760) recfm(v b)                  
RC(12)

oget '/SYSM/homedirs/id03l/scripts/olapisvr.log.archive.d2002172'
'id03l.olapamf.olapisvr.log.Fri'                         
line from loglist files is /SYSM/homedirs/id03l/scripts/Essbase.log:earice
rjcartee:olapamf                                
 

log path is /SYSM/homedirs/id03l/scripts

log file is Essbase.log

dsn hlq is  olapamf

emailid is earice rjcartee

allocate dataset('id03l.olapamf.Essbase.log.Fri') new unit(vtape)
lrecl(32756) blksize(32760) recfm(v b)                   
RC(12)

oget '/SYSM/homedirs/id03l/scripts/Essbase.log.archive.d2002172'
'id03l.olapamf.Essbase.log.Fri'                           
SYSM $




Output when sending to a file....
SYSM $                                                  
SYSM $ perl -w olaplog.pl > olaplog.pl.out 2>&1         
SYSM $                                                  


 BROWSE -- /u/homedirs/id03l/scripts/olaplog.pl.out - Line 00000000 Col 001
080
 Command ===>,                                                ,Scroll
===>,CSR ,
********************************* Top of Data
**********************************
allocate dataset('id03l.olapamf.olapisvr.log.Fri') new unit(vtape)
lrecl(32756)
oget '/SYSM/homedirs/id03l/scripts/olapisvr.log.archive.d2002172'
'id03l.olapamf
allocate dataset('id03l.olapamf.Essbase.log.Fri') new unit(vtape)
lrecl(32756) b
oget '/SYSM/homedirs/id03l/scripts/Essbase.log.archive.d2002172'
'id03l.olapamf.
line from loglist files is /SYSM/homedirs/id03l/scripts/olapisvr.log:earice
rjca

log path is /SYSM/homedirs/id03l/scripts
log file is olapisvr.log
dsn hlq is  olapamf
emailid is earice rjcartee
line from loglist files is /SYSM/homedirs/id03l/scripts/Essbase.log:earice
rjcar

log path is /SYSM/homedirs/id03l/scripts
log file is Essbase.log
dsn hlq is  olapamf
emailid is earice rjcartee
******************************** Bottom of Data
********************************

Reply via email to