Select Code to Download

#-------------------EXAMPLE OF SETTING A COOKIE-----------------------
+----
#!/usr/bin/perl
...
print "$cookie\n";
print "Content-type: text/html\n\n";
print "Have we a cookie?????\n";

#-------------------EXAMPLE OF GETTING A VALUE FROM A COOKIE----------
+----
#!/usr/bin/perl
...
    {
     print "Somebody toss me a freakin' cookie....";
    }

#-------------------EXAMPLE OF REMOVING A COOKIE----------------------
+----
#!/usr/bin/perl
...
print "$cookie\n";
print "Content-type: text/html\n\n";
print "Have we removed a cookie?????\n";

#-------------------ROUTINE FILE STARTS HERE--------------------------
+----
#
...
# usual kluge so require does not fail....
     my $XyZ=1;
#-------------------ROUTINE FILE ENDS HERE----------------------------
+----