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

Owner: Nobody in particular
Requestors: benoit.peccatte [...]

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 [...]
From: Benoit Peccatte <benoit.peccatte [...]>
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 = ""; my $url = ""; 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/ CWD project 250 OK. Current directory is /.m/mirrors8/ CWD trace 250 OK. Current directory is /.m/mirrors8/ MDTM 213 20081214090001 PORT 10,0,0,3,135,50 200 PORT command successful RETR 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 infrastructure.

Please report any issues with to