Graham,
This is the trace for the process. The problem is not on the mainframe
since all other data (first 301bytes) was correctly translated using
Ascii and represented on the mainframe.
Net::FTP>>> Net::FTP(2.77)
Net::FTP>>> Exporter(5.60)
Net::FTP>>> Net::Cmd(2.27)
Net::FTP>>> IO::Socket::INET(1.31)
Net::FTP>>> IO::Socket(1.30)
Net::FTP>>> IO::Handle(1.27)
Net::FTP=GLOB(0x1836038)<<< 220-FTPDJ1 IBM FTP CS V1R8 at NETTCPJ,
14:30:10 on 2009-09-25.
Net::FTP=GLOB(0x1836038)<<< 220 Connection will close if idle for more
than 5 minutes.
Net::FTP=GLOB(0x1836038)>>> USER JFBLL
Net::FTP=GLOB(0x1836038)<<< 331 Send password please.
Net::FTP=GLOB(0x1836038)>>> PASS ....
Net::FTP=GLOB(0x1836038)<<< 230 XXXXX is logged on. Working directory is
"XXXXX.".
Net::FTP=GLOB(0x1836038)>>> TYPE A
Net::FTP=GLOB(0x1836038)<<< 200 Representation type is Ascii NonPrint
Net::FTP=GLOB(0x1836038)>>> SITE quote RECFM=FB LRECL=302 BLKSIZE=27784
CYL PRI=10 SEC=1
Net::FTP=GLOB(0x1836038)<<< 200 SITE command was accepted
Net::FTP=GLOB(0x1836038)>>> ALLO 101248
Net::FTP=GLOB(0x1836038)<<< 202 ALLO not necessary, you may proceed
Net::FTP=GLOB(0x1836038)>>> PASV
Net::FTP=GLOB(0x1836038)<<< 227 Entering Passive Mode (149,83,3,21,15,122)
Net::FTP=GLOB(0x1836038)>>> STOR 'USER.TEST'
Net::FTP=GLOB(0x1836038)<<< 125 Storing data set USER.TEST
Net::FTP=GLOB(0x1836038)<<< 250 Transfer completed successfully.
Net::FTP=GLOB(0x1836038)>>> QUIT
Net::FTP=GLOB(0x1836038)<<< 221 Quit command received. Goodbye.
The last byte on mainframe has value of space
-9----+----0---
**************
00000000000
This is NET:FTP problem since I was able to transfer the same data using
from DOS prompt and it's looks good on the mainframe
F:\>ftp
Show quoted textftp> open 111.11.1.11
Connected to 111.11.1.11.
220-FTPDJ1 IBM FTP CS V1R8 at NETTCPJ, 14:41:14 on 2009-09-
220 Connection will close if idle for more than 5 minutes.
User (111.11.1.11:(none)): xxxxxl
331 Send password please.
Password:
230 xxxxx is logged on. Working directory is "xxxxx.".
Show quoted textftp> put test 'user.test'
200 Port request OK.
125 Storing data set USER.TEST
250 Transfer completed (data was truncated)
ftp: 132201 bytes sent in 0.25Seconds 528.80Kbytes/sec.
Show quoted textftp>
The last byte on mainframe has value of '0'
-9----+----0---
**************
000000000000
Regards,
Bruce Lis
Global Operations Technology
work. 201-761-7645
"Graham Barr via RT" <bug-libnet@rt.cpan.org>
09/25/2009 10:11 AM
Please respond to
bug-libnet@rt.cpan.org
To
BLis@Jefferies.com
cc
Subject
Re: [rt.cpan.org #50017] WIN to MAINFRAME ftp bug
<URL:
http://rt.cpan.org/Ticket/Display.html?id=50017 >
On Sep 25, 2009, at 8:19 AM, Bruce Lis via RT wrote:
Show quoted text> I have problem running NET:FTP on win32/ windows xp platform with
> perl v
> 5.8, using Eclipse 3.3.1.1. The ftp works only for 301 LRECL records
> that
> are ftp'd to mainframe OS/390. Starting from 302 bytes mainframe
> data set
> has spaces.
> Please advise
I have no experience with a mainframe running OS/390
I see you have Debug turned on, but you did not include it with the
ticket.
Also, do you happen to have a debug trace form using another ftp
client. Do you have a command line ftp client available that can
output a protocol trace.
Are you sure that ascii is the correct transfer method ?
Graham.
Jefferies archives and monitors outgoing and incoming e-mail. The contents of this email, including any attachments, are confidential to the ordinary user of the email address to which it was addressed. If you are not the addressee of this email you may not copy, forward, disclose or otherwise use it or any part of it in any form whatsoever. This email may be produced at the request of regulators or in connection with civil litigation. Jefferies accepts no liability for any errors or omissions arising as a result of transmission. Use by other than intended recipients is prohibited. In the United Kingdom, Jefferies operates as Jefferies International Limited; registered in England: no. 1978621; registered office: Vintners Place, 68 Upper Thames Street, London EC4V 3BJ. Jefferies International Limited is authorised and regulated by the Financial Services Authority.