This worked for me:

#!/usr/bin/perl

use strict;

use LWP::UserAgent;
use HTTP::Cookies;


my $myUserAgent = LWP::UserAgent->new;
$myUserAgent->agent('Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)');
$myUserAgent->cookie_jar(HTTP::Cookies->new);

my $myResponse = 
$myUserAgent->get('https://www.accessallstate.com/anon/login.aspx');

print $myResponse->content, "\n";

Reply via email to