eval { $mech->get.... }; is( $mech->res->code, 500 ); or some such
In reply to Re: testing http server by Anonymous Monk in thread testing http server by fisher