#!/usr/bin/perl print "Content-type: text/html\; charset=euc-jp\n\n"; print<<"__HTML__"; テストページ __HTML__ exit;