Help for this page
use strict; use IO::Socket; ... while (sysread($host,$byte,1)==1) { print $byte; }
HTTP/1.1 302 Object moved Date: Tue, 01 Jul 2008 20:08:00 GMT Server: Microsoft-IIS/6.0 ... Cache-control: no-cache ****** Suprisingly, HTML DATA is missing here...*****