CGI.pm is your friend :)

use CGI qw( Vars );
use Data::Dumper;
my %params = Vars()
print Dumper(\%params);
[download]

Cheers,
Darren :)