Look at the documentation of the CGI module if you want to know how to actually set and check a cookie. it will basicly look like this:

set a cookie

#!/usr/bin/perl -w 
use strict;

my $query = CGI->new();
my $cookie = $query->cookie(-name=>'testCookie',
                            -values=>'foo',
                            -expires=>'+1h',
                            -domain=>'.perlmonks.org');
print $query->header(-cookie=>$cookie);
[download]

look if cookie is set

#!/usr/bin/perl -w
use strict;
use CGI;
my $query = new CGI;
my %testcookie = $query->cookie(-name=>'testCookie');
[download]