use strict;
use CGI;
my $cgi = new CGI;
my $cookie = $cgi->cookie(
  -name => 'cookieName',
  -value => 'cookieValue',
  -expires => '+1h'
);
print $cgi->header( -cookie => $cookie );