#!/usr/bin/perl
use CGI qw(:standard);

$query_string = "";
if( length( $ENV{'QUERY_STRING'} ) > 0 ) {
	$query_string = "?".$ENV{'QUERY_STRING'};
}
print redirect(-URL=>'http://peterjanes.ca/half-birthday/'.$query_string);