use Data::Dumper;
print Dumper $mech->response; # dump returned HTTP::Response object