my $ua = new LWP::UserAgent;
$ua->agent("User-Agent: Mozilla/4.0 (compatible; MSIE 5.5; Windows 98; )"); # Lie :-)