『第2回2ch全板人気トーナメント』投票スレッド-182

#!/usr/bin/perl
use CGI;
my $query = new CGI;
my $cookie = $query->cookie(-name=>'code', -value=>'[[2ch27-mK7YnJCA-UB]]', -domain=>'.2ch.net', -path=>'/vote');
print $query->header(-type=>'text/plain', -cookie=>$cookie);
print '<<WebProg>>';