Select Code to Download

use Aspect;
my $pcut = call qr/LWP::UserAgent::send_request/;
...
use WWW::Mechanize;
my $m = WWW::Mechanize->new;
$m->get("http://www.google.com");

req================
GET http://www.google.com
...
Title: Google
==================