$mech = WWW::Mechanize->new(autocheck=>1);