Does this help?<br><br><div class="gmail_quote">On Thu, Mar 3, 2011 at 2:38 PM, Erik Wasser <span dir="ltr"><<a href="mailto:erik.wasser@iquer.net">erik.wasser@iquer.net</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">
foreach my $u ('<a href="http://localhost/test/%E3%81%8B" target="_blank">http://localhost/test/%E3%81%8B</a>',<br>
"<a href="http://localhost/test/\x{304b}" target="_blank">http://localhost/test/\x{304b}</a>" )<br>
{<br>
my $request = HTTP::Request->new(<br>
'GET'=> <b>encode_utf8($u)</b>, [ 'Content-Type' => 'text/html; charset=utf8', ],<br>
);<br>
print $request->as_string();<br>
my $response = request( $request );<br>
is( $response->content, 'length = 1', 'length = 1' );<br>
}<br>
<br></blockquote></div><br>-- <br>Bill Moseley<br><a href="mailto:moseley@hank.org" target="_blank">moseley@hank.org</a><br>