perl localhostでgifを表示するには

Question

超初心者からプログラムを初めて１週間、プログラム言語にはperlを使用しています。 mac os x です。 perlの教科書読みながら、アクセスカウンタを作ろうとした所、何故かgif画像が表示されません。ネットの素材置き場からとってきましたが、パソコン自身、gif自体は認識してくれてます。ただ、それをperlに組み込んで使おうとすると、表示されません。ブラウザはfirefoxとsafariで試しましたが、両方認識してくれませんでした。ちなみにソースはーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー #!/usr/bin/perl print "Content-type: text/html "; print " "; print "アクセスカウンタ２ "; print " "; print "

test

"; if ( open ( FH , "count.txt")){ $cnt = ; close( FH ); $cnt++; print" "; foreach $fld (split (// , $cnt)){ print "

"; } print" "; if ( open(FH, ">count.txt" )){ print FH $cnt; close(FH); } else { print "ファイルの書き込みオープンに失敗しました。 "; } } else { print "ファイルの書き込みオープンに失敗しました。 "; } print " "; print " "; __END__ ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーです。テキストファイルを確認しているので、 perl 自体の活動と、アクセスのログ？自体は正常に動いているみたいです。お願いします。助けてください！

kmee · Accepted Answer

これは、サーバーの設定の関係ですね。
そのGIFファイルをCGIと同じディレクトリに置いていませんか?

httpサーバーの設定によっては、URL上では一緒に見える CGIのディレクトリと 静的なファイルのディレクトリとが違います。Macのサーバーの初期設定では、まさにそのようになっているようです。

そのGIFファイルを WebServer > Documents に入れてみてください。

まとめると
localhost/～.cgi はCGIのアクセスと解釈され、CGI-Executables にあるファイルが実行される。
その結果の出力として出てきた locahost/～.gif は静的なファイルなので Documents にファイルを探しにいく。

mtaka2 · Answer

具体的に、カウンタ画像はどこに置いてあるのでしょうか? それに合わせてHTML出力を設定してください。 CGIは、単に「HTMLをプログラムで生成する」ものにすぎません。その出力をHTMLとして正しいものにするのは、CGIの問題ではなく HTMLの「Webデザイン」的な話になります。質問者さんのコードでは、「

」のようなHTMLデータを出力しています。このCGIが「http://localhost/cgi-bin/count.cgi」に置いてあるのですから、画像も同じディレクトリである「http://localhost/cgi-bin/0.gif」などでアクセスできるようにしておかないと、画像を表示できないことになります。画像が別のフォルダに置いてあるのなら、・画像もcgi-binフォルダに入れるか・画像の置き場所に合わせてHTML出力を変えるか、どちらかが必要です。 (後者は、例えば(「http://localhost/XXX/0.cgi」で画像が表示できるのなら、 HTMLデータとして「

」とすればいいわけですから、プログラムは「print "

";」のようになります)

kmee · Answer

まず、現状どう表示されるのですか?
このスクリプトをCGIとして実行するように、HTTPサーバーは設定できていますか?

単にfirefoxやSafariの「開く」でPerlのスクリプトを開いても、そのスクリプトがそのまま表示されるだけだと思いますが。

perl localhostでgifを表示するには

これは、サーバーの設定の関係ですね。

具体的に、カウンタ画像はどこに置いてあるのでしょうか?

まず、現状どう表示されるのですか?

この回答への補足

関連するカテゴリからQ&Aを探す

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

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