use CGI;

my $q = new CGI;
print $q->redirect("http://somesite.somewhere.com?my_query=JaPh");

# or roll it yourself
print <<THIS
Status: 302 Moved
Location: http://blah.blah

THIS