Another module that works for this task is actually CGI(::Simple).
Use it like so:

use strict;
use warnings;
use Data::Dumper qw(Dumper);
use CGI; #or CGI::Simple, if you prefer

my $info = "/?foo=Zoo&foo=aha";
my $q = CGI->new((split /\?/, $info)[1]); #again, replace with CGI::Si
+mple if desired

#and now...
my @foos = $q->param("foo");

#or
my %params = map { $_ => [ $q->param($_) ] } $q->param();
print Dumper \%params;

__END__
$VAR1 = {
          'foo' => [
                     'Zoo',
                     'aha'
                   ]
        };
[download]

Not everybody likes this approach, especially the zealots who believe CGI is a thing of the past and should be banished, and those who use it be crucified. Take into account your own standards and/or those of your boss/organization/etc.

~Thomas~ 

"Excuse me for butting in, but I'm interrupt-driven..."