my $c = $query->cookie(
                         -name    =>  'somecookie',
                         -expires =>  '+3h',
                         -domain  =>  "$ENV{HTTP_HOST}",
                         ...blahblahblah...
                       );
my $rediret_uri = "http://www.perlmonks.com"; #for example ;)
print $query->redirect(-cookie => $c,
                       -uri => $redirect_uri);