my $mech = WWW::Mechanize->new( autocheck => 1 ); $mech->add_handler("request_send", sub { shift->dump; return }); $mech->add_handler("response_done", sub { shift->dump; return });