# ... do stuff ... my $resp = $mech->submit_form(%params); print $resp->content if $resp->is_success;