> > 即興で書いてみる。 > > !/usr/local/bin/perl > > # テキスト出力 > > local($filename) = '(テキストファイル名)'; > > print "Content-type: text/plain\n"; > > print "\n"; > > open(TXT,"$filename"); > > print <TXT>; > > close(TXT); > > exit 0; > > 以上だ。 > つか、テキストファイル表示させるだけならテキストファイルのまま置いておけばいいんじゃないのか 俺もそう思うんだけどな。 まぁ、文字コード変換とか、ちょっと何かしたいのかもしれないし。 参考:2001/06/09(土)04時14分00秒