#!/usr/bin/perl -Tuse strict;use CGI qw/:standard/;my $cookie = cookie(-name=>'testcookie',-value=>'testvalue');print header (-cookie=>$cookie);print "You've received a cookie\n";exit;
\n";exit;