cgiでhtmlファイルを読み込みたい

Question

cgiでhtmlファイルを読み込み、状況に応じてcgiで内容の修正や追加をして表示させたいのですがどうしても元ファイルを読み込めません。

IN = "○○.html";
$line = open(IN, "r");

とか

$line = opne IN, "○○.html";

それに

$line = "○○.html";
open(IN, $line);
@line = <IN>;

など調べて出てきたもの一通りやってみたのですが、どうしても読み込みができません。
どうすればファイルの読み込みができるのでしょうか。
仕事でどうしてもやらなければならないので、ご存じの方お助けください。

venzou · Accepted Answer

openはCGIが実行されているOSが管理しているファイルを開くためのものです。ファイルの相対パスか絶対パスを指定します。URLではありません。

http://○○.com/index.html等のURLのファイルを取得するには、HTTP等のネットワーク通信を経由してファイルを取得することになります。openとはまったく別の仕組みになります。

>将来的には同一サーバー・同一ドメイン
>今のところ、サーバーが全く別のところにあります。

前述の通り、openとHTTPは全く別物です。処理の負荷も全く違います。将来的にはopenを使う事になると思います（処理の負荷、速度を考慮して）。

その「将来」が近い将来なら、別サーバのファイルをCGIと同じサーバにコピーして、openを使って処理するCGIを作った方が良いと思います。今、HTTPを利用するCGIを作っても無駄になる可能性があります。


HTTPを利用する場合、openよりもかなり複雑なプログラムになります。（LWPなどのモジュールが利用できる場合は簡単で、数行のコードで済みますが・・・）

LWPなどのモジュールが利用できる場合

#!/usr/local/bin/perl
use LWP::Simple;
$url = "http://○○.com/index.html";
$content = get($url);
print $content;


モジュールが利用出来ない場合は、ここで説明するのは面倒なので、

http://ash.jp/perl/socket_http.htm

こちらのサイトなど参考にして下さい。



>ただ、テストで同一サーバーでもやってみましたがうまくいきません。

$filename の内容は？ http://～　は使えませんよ。
CGIの有るディレクトリからの相対パスで指定してみてください。

venzou · Answer

>そのhtmlファイルに直接記述してあるものは全部読めました・・・が、cssやimageファイルは全く読み込んでくれません。

HTMLの基礎的な内容だと思いますが・・・(^^;

HTML内に相対アドレスで指定されているファイルは当然そのままでは開けません。絶対アドレスに書き換えるか、参照している全てのファイルをCGI側のサーバにコピーするかどちらかです。


>お手間おかけしますがあともう少しだけアドバイスください。

私の分かる範囲でしたら、時間の許す限り何でもお答えしますが、先行きが怪しくなってきたので一度整理させて下さい。あと少しでは済まない感じがしますよ(^^;


>cgiでhtmlファイルを読み込みたい
最初の質問は解決しました。別サーバのhtmlファイルを読み込むことは出来ました。
で、それを使って最終的に「何がしたいのか？」が分かりません。

現在htmlが有るサーバ：サーバＡとします。
現在CGIが有るサーバ：サーバＢとします。

サーバＡはインターネット上に公開済みですよね？
サーバＢもインターネット上に構築中でしょうか？それともローカルでテスト中でしょうか？

サーバＢのCGIでサーバＡのhtmlファイルを読み込んで、一部を修正して、その先は？

ひょっとしてサーバＡのサイトを丸ごとサーバＢ上に再現しようと言う計画でしょうか？

venzou · Answer

>ちなみにindex.htmlのところはhttp://○○.com/index.htmlと変えてます。

これはダメですよ。
同じサーバのファイルなら、httpではなく、ファイルのパスを指定します。

別のサーバのファイルなら、openでは開けません。
別の手段で取得可能です。

同じサーバのファイルか、別のサーバのファイルか補足願います。

venzou · Answer

#2です。念のため修正します。 >print "File Open Error"; print "File Open Error"; タグ入れるの忘れてました。

venzou · Answer

文法的な問題ではないように思います。

まず、CGIは実行されてますか？
ファイルのパーミッションや、1行目のperlのパスは問題ないですか？

下記のスクリプトの実行結果はどうなりますか？

#!/usr/local/bin/perl

$filename = "index.html";

if(open(IN,$filename)){
@lines = <IN>;
close(IN);
print "Content-Type: text/html
";
print "
";
print @lines;
}else{
print "Content-Type: text/html
";
print "
";
print "File Open Error";
}
exit;

noname#39970 · Answer

CGIって　サーバが返す仕掛けの事を言ってるだけで言語の事を指してるわけじゃない
何を使ってるのか判らないので答えようが無いんだけど？

http://www.google.co.jp/search?q=perl%20%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB&hl=ja&lr=lang_ja

cgiでhtmlファイルを読み込みたい

openはCGIが実行されているOSが管理しているファイルを開くためのものです。

この回答への補足

>そのhtmlファイルに直接記述してあるものは全部読めました・・・が、cssやimageファイルは全く読み込んでくれません。

>ちなみにindex.htmlのところはhttp://○○.com/index.htmlと変えてます。

この回答への補足

#2です。

この回答への補足

文法的な問題ではないように思います。

この回答への補足

CGIって サーバが返す仕掛けの事を言ってるだけで言語の事を指してるわけじゃない

この回答への補足

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

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

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

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

CGIって　サーバが返す仕掛けの事を言ってるだけで言語の事を指してるわけじゃない