$ perl -MWWW::Mechanize -le " print WWW::Mechanize-> new->get( shift )->request ->as_string" http://example.com
GET http://www.iana.org/domains/example/
Accept-Encoding: gzip
User-Agent: WWW-Mechanize/1.68