use CGI ();
my $cgi = CGI->new();
my $cookie = $cgi->cookie(-name => 'test', -value => '1');
print $cgi->redirect(-uri => 'http://www.perlmonks.org/', -cookie => $cookie);