2006-07-11 HTMLを表示する 備忘録: Perl print <<"EOD"; Content-type: text/html;CHARSET=Shift_JIS$html EOD xmlの場合はこんな感じ print <<"EOD"; Content-Type: text/xml Accept-ranges: bytes$xml EOD