06/09/28 01:36:02
>>950
これでいいのかな？
#!/usr/local/bin/perl
open(JPG, "../public_html/images/52.jpg");
read(JPG, $jpgbuff, (-s JPG));
close(JPG);
print "Content-Type: image/jpeg\n\n";
binmode(STDOUT);
print $jpgbuff;
実行したら、画像じゃないものがDLされてきますｗ；
＞実行結果
Content-Type: image/jpeg
ﾘ・Exif II* ・徽FXX ﾘ・JFIF H H ﾛ ・
以下ぐちゃぐちゃｗ
>>951
うーむ。謎ですね。
#!/usr/local/bin/perl -- 、やってみましたが結果変わらずです。。。
サポートに連絡してみますね。