Has anyone done any FTP'ing to IBM ZOS/390 machine. As you can
see in the output there was a timeout due to waiting for a file to
recalled from tape to disk.
Output:
Net::FTP=GLOB(0x15f35c)>>> STOR FREQ0407
Net::FTP=GLOB(0x15f35c)<<< 125-Waiting for recall of data set
FTPTRGP.FREQ0407
Net::FTP=GLOB(0x15f35c): Timeout at pl545.pl line 2612
Net::FTP=GLOB(0x15f35c)>>> QUIT
Net::FTP=GLOB(0x15f35c)<<< 125 Storing data set FTPTRGP.FREQ0407
Now the script has the following:
$MyFTP->put($MyFtpFromFile , $MyFtpToFile );
if ( ! $MyFTP->ok() ) {
my $MyMsg = $MyFTP->message() ;
my $MyCode = $MyFTP->code();
...
but I know that I am not hitting this code, since the next
portion of the script would send an error msg if there was one, but it
goes on to normal completion. The TIMEOUT that is being displayed is
the 'put' above.
The code is running on:
v5.8.3 built for sun4-solaris
Any ideas or suggestions to see what is happening would be
greatly appreciated.
Thanks.
Wags ;)
David R Wagner
Senior Programmer Analyst
FedEx Freight
1.408.323.4225x2224 TEL
1.408.323.4449 FAX
http://fedex.com/us
**********************************************************************
This message contains information that is confidential and proprietary to FedEx
Freight or its affiliates. It is intended only for the recipient named and for
the express purpose(s) described therein. Any other use is prohibited.
**********************************************************************
