09/01/03 12:47:33 rMyERx8L
#!/usr/bin/perl
open(IN, $filename) or die;
read(IN, $data, -s IN);
print "Content-type: text/html\n\n",$data;
動かないorz
data.txtの中身を全部スカラー変数に入れたいだけなのにうまくいかない
09/01/03 12:47:33 rMyERx8L
#!/usr/bin/perl
open(IN, $filename) or die;
read(IN, $data, -s IN);
print "Content-type: text/html\n\n",$data;
動かないorz
data.txtの中身を全部スカラー変数に入れたいだけなのにうまくいかない