> > 即興で書いてみる。 > > !/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秒