Bug in libwww-perl-5.53
Boris 'pi' Piwinger (3.14@logic.univie.ac.at)
Wed, 11 Apr 2001 11:50:35 +0200
Hi!
There is a bug in libwww since 5.51. Whenever the server response
message ends with a ), a \n is appended. Example:
[3.14@pi ~]$ cat bin/test.pl
#!/usr/bin/perl
use LWP::UserAgent;
print "This is libwww-perl-$LWP::VERSION\n";
my$ua = new LWP::UserAgent;
my$url = "http://no.such.host/";
my$response = $ua->simple_request(HTTP::Request->new("GET",$url));
print "#".$response->message."#\n";
$url = "http://www/no.such.file";
$response = $ua->simple_request(HTTP::Request->new("GET",$url));
print "#".$response->message."#\n";
[3.14@pi ~]$ test.pl
This is libwww-perl-5.51
#Can't connect to no.such.host:80 (Bad hostname 'no.such.host')
#
#Not Found#
[3.14@pi ~]$ test.pl
This is libwww-perl-5.53
#Can't connect to no.such.host:80 (Bad hostname 'no.such.host')
#
#Not Found#
I guess this is a consequence of the "Avoid potential '<FILE> chunk 1'
messages at the end of the response 'message'." fix.
pi