use CGI;
my $cgi = CGI->new();
my @cookies = $cgi->cookie();
print "cookie is set" if @cookies;
[download]

In list context cookie() returns all cookies. This is one way to test if a cookie is set.