my $params = join '&', map { "$_=" . uri_escape($hash{$_}) } keys %hash;
print q->redirect("http://foo/cgi-bin/bar.cgi?$params");