如何使用Perl CGI设置cookie？

#!/usr/bin/perl

use strict;
use warnings;
use CGI qw/:standard/;

print header, start_html('Setting a Cookie'),
    h1('Setting a Cookie'),
    p('This is a simple Perl CGI script that sets a cookie.'),
    end_html;

my $cookie = cookie(
    -name    => 'myCookie',
    -value   => 'myValue',
    -expires => '+1h',
);

print header(-cookie => $cookie);