SSI で #exec 以外で Perl-CGI を実行する方法は？

Question

最近 CGI に興味をもち Perl を始めました。
簡単なサンプルを無料サーバーにアップロードして cgi だけを
直接実行すると問題なく実行されます。

ですが SSI の #exec を使って HTML ソースに

と記述してページを開くと
[an error occurred while processing this directive]
と表示されてエラーになりました。

無料サーバーは infoseek で CGI/SSI は使えると書かれていたので
試してみました。それでもう一度確認の為に読んで見ると『#exec』は
セキュリティ強化のため利用できないことが判明しました。
http://help.www.infoseek.co.jp/isweb/20602.html#7

質問内容:
(1)CGI/SSI は使えるが #exec は使えない状況でどうやって Perl-CGI を
　 HTML ソースに記述して実行すればよいのか？
(2)CGI は cgi-bin に置きパーミッションを 755 に設定しています。
　 設定は infoseek さんの指示通りです。他に設定すべき点ありますか？
(3)Perl-CGI の１行目ではちゃんと『#!/usr/local/bin/perl』と記述しています。
　 こちらも infoseek さんの指示通りです。
　 Perl の記述で何か気をつけるべき点はありますか？バグ以外で。
(4)HTML ソースの拡張子は shtml にしています。
　 SSI を使うにはサーバーが対応していれば拡張子を変えるだけで使えるのですか？

今回の質問は Perl-CGI を HTML ソースに記述して実行する？には
どうすべきかをお聞きしたいです。infoseek さんの情報は次のリンクです。
http://help.www.infoseek.co.jp/isweb/20601.html
またネット検索していたら次のページを発見しました。
http://cocohome.hp.infoseek.co.jp/ssi/
ここの人は私と同じ infoseek で SSI 入門を書いています。
なぜこの方は SSI の #exec が使えるのでしょうか？
この辺も知りたいです。
分かる方お願いします。
教えて下さい。

hrm_mmm · Accepted Answer

infoseekのフリーサーバーを利用している者です。

SSI #execが不可になったときに、#include を試してみましたが、その時はプログラムソースがそのままincludeされてましたが、それではあんまりだと、今はエラー表示になったようですね。
No.5でご呈示のHTTP_REFERER編集まではやってませんが、たぶん無理かと思います。
SSIでユーザープログラムを実行させることそのものを排除しているように思います。

あと、#includeに限らず#flastmodなどでもvirtualで絶対パス指定でいけるんですけど、そのshtmlファイルが存在するディレクトリーより上位にさかのぼる位置のファイルは指定出来ないようです。

No.2補足のところでご呈示の方法ですけど、<img src>で一旦呼び出してファイル作成だと、ブラウザがファイルを読みに行くタイミングが前後することがあるので、<script src="sample.cgi"> で直接呼び出してしまう方がよいと思います。
その場合、cgiでのheader記述は以下のようにしないとよけいな宣伝タグ挿入されてJavaScriptエラーになります。
print qq(Content-type: application/x-javascript;\n\n);

修正版 ●HTMLソース(sample.shtml)
----------
<HTML>
<HEAD><TITLE>CGIテスト</TITLE></HEAD>
<BODY>

<script type="text/javascript" src="/cgi-bin/sample.cgi">
</SCRIPT>
<noscript>
JavaScriptがオフのため表示出来なくて済みません。
</noscript>
</BODY>
</HTML>
----------
修正版 ●Perl-CGI(sample.cgi)
----------
#!/usr/local/bin/perl
print qq(Content-type: application/x-javascript;\n\n);

&sample;
exit;
sub sample{
　　$format = "%04d/%02d/%02d %02d:%02d:%02d";
　　my($sec, $min, $hour, $day, $month, $year, $week, $yday, $isdst) = localtime();
　　print "document.write('";
　　print sprintf ($format, $year+1900, $month+1, $day, $hour, $min, $sec);
　　print "');\n";
}
----------
全角空白のindentはそのままです。コピー時は注意して下さい。
JavaScriptがオフだと実行されないのは致し方ないかな？

アクセス時刻でなくカウンターなら<img src>呼び出しの書き込みファイルでは「次番号」にしておけば、前回書き込んだファイルを#includeしても違和感はないように思います。
つまり、初期値を1から初めて先に表示用sample.datファイルを作っておきます。
で、No.2補足に有る方のsample.shtmlのscriptタグを以下に置き換えます。


SSIの替わりになる対策としては、たぶんこの２つくらいでしょうね。
あと、iframe かな？　でもフレーム内にも宣伝が入ってくるのであんまり実用的ではないですけどね。

taloo · Answer

っと、、まだ閉じられてないようですね。

SSIからの実行そのものが禁止されてるとどうしようもないですけど、
iswebライトのアカウント登録メールが届いたので、実験してみましたが、動くみたいです。

ANo.5のHTTP_REFERERを入れるコードを使ってますが、
HTTP_REFERERを入れても入れなくても動いてるようです。
ANo.4の回答のところで問い合わせたらしいですけど、設定が変わったんでしょうか？（そう簡単なことじゃないはず何ですが、、、）
上位ディレクトリへのアクセスも試してみましたが、これも動きました。
なんかよくわかりません。。。（´・ω・`）

http://*****infoseek.co.jp/cgi-bin/hello.cgi
#!/usr/local/bin/perl
print "Content-Type: text/html

";
print "Hello
";

http://*****infoseek.co.jp/index.shtml
http://*****infoseek.co.jp/test/hoge.shtml
ともに 

これでHelloと表示されました。
（念のため、index.shtmlとhoge.shtmlの２種類）

taloo · Answer

いまさらですが、 http://isweb.www.infoseek.co.jp/Icont?sv=IW&pg=iw_spec.html /header.txt というファイルは特に作らなくても、表示されるということで、 virtualで指定したときのパスが、通常のパスとは違う所にマッピングされてるのかな、とも思ったんですが、 http://www.akiyan.com/cc1linebbsv2#infoseek_isweb 検索にちょっと時間がかかりましたが、見つかりました。別の細工がしてあるみたいです。トップページ以外のページでは普通にできるとかなんとか。対処法は考えてみます。まぁ、REFEREを入れるだけですがアカウントを取るのに２日ほどかかるとか、、、試す予定のコード index.shtml
これでできなかったらお手上げです。逆にこれで動けば、リファラーを出さない設定のブラウザでも動かすことができると思います。 > ANo.4 くだらない回答をしてしまったみたいで、すみません。

taloo · Answer

> #include virtualで全滅 http://********/cgi-bin/sample.cgi にアクセスして、正常に表示されます？ ANO.2の書き方から邪推ですが、標準出力になにか出力しないとエラーになります。 SSIで実行するなら print "Content-Type: text/plain " という"おまじない"だけでもいいと思います。 HTMLファイルに入れられるのはテキストだけです。 Windowsアプリでstdoutにバイナリデータを出力するって言うのはそうそうないと思いますけど、 CGIの場合は画像を作成してそのままstdoutに出力することもあります。それが

という使い方です。これを

としても、画像ファイルをnotepad.exeで開く様な状態になりますので、 [an error occured～]は表示されないかも知れませんが、ブラウザで表示できないかもです。もし

のまま実行するなら、１ピクセルの透明GIFか何かを作って、それを読み込み、 "Content-Type: image/gif "という"おまじない"つきで標準出力に出力しておけばいいと思います。ちなみに、

はSSIじゃないです。 SSIはこういうのです。

steel_gray · Answer

infoseekでしたね。
制限とか、クセとかわからないんで的確なアドバイスはできそうもないです。

同じ階層のファイルの読み込み
file="sample.txt"

CGIの実行結果の受け取り
file="cgi-bin/sample.cgi"
(Content-Type は text/html ではなく text/plain )

で、動かなければよくわからないです。

steel_gray · Answer

http://www.tohoho-web.com/wwwssi.htm#Include
Includeでもfileにスクリプトを指定すれば実行後、挿入されたと思います。

noname#39970 · Answer

>なぜこの方は SSI の #exec が使えるのでしょうか？
http://cocohome.hp.infoseek.co.jp/ssi/exec.html
使えなくなった事を後で知ったと書かれている。
つまり動作するものを件の場所には置いて折らず#execを使える場所でしか使っていないという事になる。

SSI で #exec 以外で Perl-CGI を実行する方法は？

infoseekのフリーサーバーを利用している者です。

っと、、まだ閉じられてないようですね。

いまさらですが、

> #include virtualで全滅

この回答への補足

infoseekでしたね。

この回答への補足

この回答への補足

>なぜこの方は SSI の #exec が使えるのでしょうか？

似たような質問が見つかりました

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

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

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