You want to check out the CGI module.

use CGI;

my $cgi = new CGI;

my $where = $cgi->param('where');
print $where . "\n";
[download]