Problem with HTTP::Request/Headers

BluePatch@mel.meloo.com
Wed, 16 Jun 1999 14:00:52 +0200


Hello, I made a short program to get the type of a server.

Here is a part of the source :
-8<----8<----8<----8<----8<----8<----8<----8<----8<----8<----8<----8<---
use HTTP::Headers;
use LWP::UserAgent;

my $request = new HTTP::Request( 
'GET'=>"http://www.01direct.fr" );

my $ua = new LWP::UserAgent;
my $response = $ua->request($request) || return "ERROR\t$!";

print $response->server;
-8<----8<----8<----8<----8<----8<----8<----8<----8<----8<----8<----8<---

it works for most of web server but not this one : www.01direct.fr 
(for exemple).

Could you help me ?

Thanx

Francis
Francis