parsing - Perl - Parse URL to get a GET Parameter Value

Question

How to get the value of a parameter code using URI::URL Perl module?

From this link:

http://www.someaddress.com/index.html?test=value&code=INT_12345

It can be done using URI::URL or URI (I know the first one is kind of obsolete). Thanks in advance.

Answer 1

Create a URI object and use the query_form method to get the key/value pairs for the query. If you know that the code parameter is only specified once, you can do it like this:

my $uri   = URI->new("http://www.someaddress.com/index.html?test=value&code=INT_12345");
my %query = $uri->query_form;

print $query{code};

Alternatively you can use URI::QueryParam whichs adds soem aditional methods to the URI object:

my $uri = URI->new("http://www.someaddress.com/index.html?test=value&code=INT_12345");
print $uri->query_param("code");