my $mech = WWW::Mechanize->new( agent => 'Windows IE 6');