#create session
my $session = new CGI::Session();

#create cookie
my $session_cookie = new CGI::Cookie(
	-name => 'CGISESSID',
	-value => $session->id(),
	-domain => 'domain.com',
);

#redirect
print redirect(
	-cookie => [$session_cookie],
	-uri => $referer,
);