andy $agent = LWP::UserAgent->new(cookie_jar => HTTP::Cookies->new, reque +sts_redirectable => [ 'GET', 'HEAD', 'POST' ]); $agent->agent( 'Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8 +.1.14) Gecko/20080404 Firefox/2.0.0.14'); $agent->default_header('Accept' => "text/xml,application/xml,applicati +on/xhtml+xml,text/html;q=0.9,text/plain;q=0.8,image/png,*/*;q=0.5", 'Accept-Language' => "en-us,en;q=0.5", 'Accept-Charset' => "ISO-8859-1,utf-8;q=0.7,*;q=0.7", 'Keep-Alive' => "300", 'Connection' => "keep-alive");
my $agent = WWW::Mechanize->new(autocheck=>1, agent=> 'Mozilla/5.0 (Wi +ndows; U; Windows NT 5.1; en-US; rv:1.8.1.14) Gecko/20080404 Firefox/ +2.0.0.14'); $agent->max_redirect(100); $agent->default_header('Accept' => "text/xml,application/xml,applicati +on/xhtml+xml,text/html;q=0.9,text/plain;q=0.8,image/png,*/*;q=0.5", 'Accept-Language' => "en-us,en;q=0.5", 'Accept-Charset' => "ISO-8859-1,utf-8;q=0.7,*;q=0.7", 'Accept-Encoding' => "gzip,deflate", 'Keep-Alive' => "300", 'Connection' => "keep-alive", 'TE' => "");
In reply to Re^2: LWP::UserAgent vs WWW::Mechanize
by jcdento
in thread LWP::UserAgent vs WWW::Mechanize
by jcdento
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |