1 #!/usr/bin/perl -wT 2 use strict; 3 4 print "Content-Type: text/plain\n"; 5 print "Cache-Control: no-store\n"; 6 print 'Cache-Control: no-cache="set-cookie"' . "\n"; 7 8 print "HTTP_COOKIE: " . ($ENV{HTTP_COOKIE} || "") . "\n\n"; 9
