Select Code to Download

use CGI qw(:standard);

...
print "Set-Cookie: cookie=$value\n";
print "\n\n";
print "The cookie was set.\n";