重要なお知らせ

「教えて! goo」は2025年9月17日(水)をもちまして、サービスを終了いたします。詳細はこちら＞

電子書籍の厳選無料作品が豊富！

画像ファイルが崩れる

解決済

  • 質問者：potch
  • 質問日時：
  • 回答数：1件

Perlで、CGIを作成しています。

GIF画像をCGI経由で表示させようと思っているのですが、なぜか、画像が崩れてしまいます。GIFだけではなく、Jpegでも同じです。しかし、HTMLファイルの <img>タグでそのまま表示させようとすると、きちんと表示します。
どのようにすれば、崩れを抑えられますか?

CGIソース----------------------
#!/usr/local/bin/perl
$imgsrc="number/0.gif";
print "Content-type:image/gif\n\n";
open(IMG,$imgsrc);
binmode(IMG);
print <IMG>;
close(IMG);
-----------------------------EOF

HTML----------------------------
<html>
<head>
</head>
<body>
<img src="cgi/image.cgi" width="28" hegiht="31">
</body>
</html>
------------------------------EOF

gif画像は、
http://www.akikobrand.com/icon/img/10/6/0.gif
を使わせていただきました。(個人的な使用です)

通報する

この質問への回答は締め切られました。

質問の本文を隠す

A 回答 (1件)

No.1ベストアンサー

  • 回答者： steel_gray
  • 回答日時：

print <IMG>;


の前に
binmode(STDOUT);
を足してみてください。

この回答への補足

レスありがとうございます。
と言うことは、

open(IMG,$imgsrc);
binmode(IMG);
binmode(STDOUT);
print <IMG>;
close(IMG);

のようにすればいいのでしょうか?

補足日時：2005/03/22 07:41
通報する
    • good
    • 0
    • 件
通報する
この回答へのお礼

情報ありがとうございました。
実験してみた結果、binmode(STDOUT);だけでよかったです。

通報する
お礼日時：2005/03/22 15:04

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

Q質問する（無料）

ページトップページトップ

Q質問する（無料）

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

おすすめ情報