print OUTFILE $mech->response->content();

##</code><code>##

print OUTFILE $mech->response->decoded_content();