Hi
Does any one know how to do something similar to this:
http://www.domainwatch.com/...gossamer-threads.com
Does any one know how to do something similar to this:
http://www.domainwatch.com/...gossamer-threads.com
Jan 28, 1999, 3:20 AM
User (134 posts)
Jan 28, 1999, 3:20 AM
Post #2 of 3
Views: 3313
This is straight forward header parsing, something that LWP does very well, and easy to do. \\ponders// This is a very brief code snip that will produce the output:
use HTTP::Request;
$ua = new LWP::UserAgent;
$request = HTTP::Request->new(GET => 'http://localhost/');
$response = $ua->request($request);
print $response->headers_as_string();The following is an example of what was outputted by the program when I ran it on my Win32 Apache server installed locally:
Date: Thu, 28 Jan 1999 14:15:28 GMT
Accept-Ranges: bytes
Server: Apache/1.3.3 (Win32)
Content-Length: 1673
Content-Type: text/html
ETag: "0-689-36657e36"
Last-Modified: Wed, 02 Dec 1998 17:51:50 GMT
Client-Date: Thu, 28 Jan 1999 14:15:28 GMT
Client-Peer: 127.0.0.1:80
Title: Test Page for Apache Installation on Web SiteI hope this is what you had in mind.
------------------
Fred Hirsch
Web Consultant & Programmer
Code:
use LWP::UserAgent; use HTTP::Request;
$ua = new LWP::UserAgent;
$request = HTTP::Request->new(GET => 'http://localhost/');
$response = $ua->request($request);
print $response->headers_as_string();
Code:
Connection: close Date: Thu, 28 Jan 1999 14:15:28 GMT
Accept-Ranges: bytes
Server: Apache/1.3.3 (Win32)
Content-Length: 1673
Content-Type: text/html
ETag: "0-689-36657e36"
Last-Modified: Wed, 02 Dec 1998 17:51:50 GMT
Client-Date: Thu, 28 Jan 1999 14:15:28 GMT
Client-Peer: 127.0.0.1:80
Title: Test Page for Apache Installation on Web Site
------------------
Fred Hirsch
Web Consultant & Programmer