#!/usr/local/bin/perl

$cookie = $ENV{'HTTP_COOKIE'};


print "Content-type: text/html\n\n";
print "<HTML>\n";
print "<TITLE>環境変数</title>\n";
print "<body>\n";
print "<h1>クッキーの読み出し</h1>\n";
print "<hr>\n";
print "Cookieの内容 ： $cookie\n";
print "</body>\n";
print "</html>\n";
exit;
