use URI;
my $uri = URI->new("http://localhost/test.html?test=1");
print $uri->path . "\n";