I need help for my webpage-retrieving Script in PERL

I need help for my script that should retrieve an ASP-webpage through Perl.
(for example this page:
I only retrieve an Error-Webpage that the script or file isn't located on the server.

I used this Script:
---------------------------------------

#!/usr/bin/perl -w

use IO::Socket;

$host = "$EOL = "\015\012";
$BLANK = $EOL x 2;

foreach $document ( "" )
{

$remote = IO::Socket::INET->new( Proto => "tcp",
PeerAddr => $host,
PeerPort => "http(80)",
);
unless ($remote) { die "cannot connect to http daemon on $host" }
$remote->autoflush(1);
print $remote "GET $document" . $BLANK;
while ( <$remote> ) { print }
close $remote;
}

---------------------------------------

It would be great if anybody could help me ;-)