##
use CGI;
use Data::URIEncode qw(query_to_complex);
use Data::Dumper qw(Dumper);
my $q = CGI->new;
my $data = query_to_complex($q);
print "Content-type: text/plain\n\n";
print Dumper $data;
__END__
Will have printed something similar to:
$VAR1 = {
users => [{
username => "...",
email => "...",
name => "...",
},{
username => "...",
email => "...",
name => "...",
}],
};