Help for this page
GET / HTTP/1.0
#! /usr/local/bin/perl -w ... my $res = $ua->request( $r ); print $res->content; warn $res->code;
#! /usr/local/bin/perl -w ... ) ), $q->end_html();