Skip Menu |
 

This queue is for tickets about the libwww-perl CPAN distribution.

Report information
The Basics
Id: 41729
Status: resolved
Priority: 0/
Queue: libwww-perl

People
Owner: Nobody in particular
Requestors: benoit.peccatte [...] enst-bretagne.fr
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: [BUG] lwp ftp head
Date: Mon, 15 Dec 2008 20:24:39 +0100
To: bug-libwww-perl [...] rt.cpan.org
From: Benoit Peccatte <benoit.peccatte [...] enst-bretagne.fr>
Download (untitled) / with headers
text/plain 1.5k
Hi, I've got a problem with the following code : --------------------------------------------------------------- #!/usr/bin/perl use LWP::UserAgent; use LWP::Simple; use Data::Dumper; my $lwp = LWP::UserAgent->new(); #my $url = "ftp://193.166.3.2//pub/linux/mirrors/debian//project/trace/ftp-master.debian.org"; my $url = "ftp://ftp.us.debian.org/debian//project/trace/ftp-master.debian.org"; my $req = HTTP::Request->new(HEAD => $url); my $data = $lwp->request($req); print Dumper($data); --------------------------------------------------------------- Using the first url, it returns an error 500, using the second, it returns a code 200. Both files are retrievable via wget and both ftp server work correctly. Here is a tcp stream dump of what happens : --------------------------------------------------------------- ... 250 OK. Current directory is /pub/Linux CWD mirrors 250 OK. Current directory is /pub/Linux/mirrors CWD debian 250 OK. Current directory is /.m/mirrors8/ftp.debian.org/debian CWD project 250 OK. Current directory is /.m/mirrors8/ftp.debian.org/debian/project CWD trace 250 OK. Current directory is /.m/mirrors8/ftp.debian.org/debian/project/trace MDTM ftp-master.debian.org 213 20081214090001 PORT 10,0,0,3,135,50 200 PORT command successful RETR ftp-master.debian.org 150 Connecting to port 34610 226-File successfully transferred 226 0.001 seconds (measured here), 94.26 Kbytes per second ....ABOR 500 ? 500 Logout. --------------------------------------------------------------- I think the ABOR is too slow and shouldn't be done.


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.