cowさんへ
>binmode GIF; ではないですか？
ありがとうございます。その通りでした。
こんなことで、半日も悩んでしまいました。
助かりました。
ありがとうございました。
わんこさん
>binmode IMG;
binmode GIF; ではないですか？
こんにちは。
Perlの勉強のためhttpdを使用させていただいています。
教えてください。
下記ソースを実行すると、イメージ図(GIF)が上部の一部だけ表示されます。
どうしたらよいのでしょうか？
#!c:/Perl/bin/Perl.exe-w
my $src="C:\\www\\home\\test\\in_board.gif";
open (GIF,"<$src")or die print "失敗";
binmode IMG;
binmode STDOUT;
print "Content-Type:image/gif\n\n";
print <GIF>;
close(GIF);
exit;