時間指定でランダムにhtmファイルを表示したい

Question

perlカテゴリでも質問させて頂いたのですがちょっと無理があったようですので改めてこちらに質問させて頂きます。

画像のランダムスクリプトと似たかんじでhtmファイルを差し替えるスクリプトって作ることは可能でしょうか？

あるフォルダに多数のhtmファイルを格納しておけばランダムに指定した間隔時間でそのファイルが表示されるといった仕様にしようと改造を試みたのですがどうもうまくいきません。

どなたかPerl言語に精通されている方がいらっしゃいましたらそのスクリプト例をお教え頂きたいのです。

お手数をお掛けします
どうぞよろしくお願い致します。

Dpop · Accepted Answer

#4 です。

>画像ファイルの場合のようにひとつのディレクトリにまとめることは難しいでしょうか？

ムムム。もしや、HTTPの事を正しく理解されていない??
image/* と text/html を同じように考えていませんか?

image/* って、HTMLソースでは無いですよね?  って言うことは、ページ遷移はしませんよね??

ここで重要なのは、ページ遷移が発生するかどうか。じゃ無いでしょうか?

なので、ご希望の様な動作はできません。


それにですよ。携帯電話でそんなことやったら(もし、できたとしても。と言う前提の元ですが。)、パケット代が嵩んで大変な事になるんじゃ無いですか? ユーザーはそれで納得されるのでしょうか?
僕は、仕事でCGIなどを作っているのですが、僕だったら、そんな仕様書は門前払いですね。「売れないものに金かけてどうするの?」って感じです(--;)


まぁ、お気持ちは分からなくも無いですが、これを機会にもう少しHTTPについて勉強して見てください。少なくても、ご自分でCGIを作られるのでしょうから、邪魔にはならない知識ですから。
その上で、こんなこと知りたい。とか。あんなこと知りたい。とか。言うのであれば、また質問してみれば良いと思います。僕は、分かる事はお答えします。

Dpop · Answer

#3 です。

> できればディレクトリを指定するだけでファイルを勝手にランダムに表示するような仕様にしたいのですが・・

の部分について書くのを忘れてしまいました(^_^;;)

時間毎にディレクトリがあって、そのディレクトリの中に、いくつかのHTMLが入っている。そのHTMLをランダムに表示する。って言うことで良いですかね?

時間毎の部分は、既に案がでているので、ディレクトリを指定して。の部分だけで焦点を当てます。


ディレクトリ名を渡すと、その中からファイル名を一つ取り出すサブルーチンを作りましょう。

sub getfile {
my($dirname) = @_;

opendir(DIRS, $dirname);
my(@dirs) = readdir(DIRS, "*.html");
closedir(DIRS);

($dirs[int(rand(scaler(@dirs)-1))]);
}

なんて感じで良いかな。(動かしていません。バグってたらゴメンバージョンです(^^;))

こんな感じで、ランダムに取り出すことで、目的の動作をする様になるんじゃ無いでしょうか。

Dpop · Answer

#1 です。既に、#2 の方が具体的な方法論を挙げて下さったので、補足的な部分を書きたいと思います。 (1)ホームページをCGIにすると便利です。.htaccess を使用して、ホームページを変えましょう。 DirectoryIndex index.cgi などと書けば良いでしょう。詳しくは、ミケネコの htaccess リファレンス http://www.mikeneko.ne.jp/~lab/web/htaccess/ を参考にしてみてください。 (2)時間ごとに変更する内容は、サブディレクトリに入っている。と言うことなので、index.cgi から locationヘッダを使って、そのファイルへ遷移させる。と言うのが一般的なパターンです。が、こんな方法もあります。HTML::Template と言うモジュールがあります。これは、HTMLの中に特殊なタグを組み込んで、その内容を Perl で埋め込んで編集し、出力しよう。と言う趣旨のモジュールです。上記の、index.cgi に HTML::Template モジュールを組み込んで置き、変わる部分をテンプレートの置き換え指示で置き換える。と言う方法です。読み込まれる方は、HTMLの文法で～の内容を書いて置けば良いでしょう。指定の時間になったら自動的にリロードさせる。と言うことはやはり無理があるので、見せ方の方を考えるベキかも知れません。

kosa · Answer

Perlで指定時間ごとに表示したいhtmlファイルまでのパスを格納しておき、時間取得関数を使い、○時ならこれを表示するとIF文でかけばいいでしょう。

ただ、上記の方法を使うといくつか問題があります。まずCGIにアクセスないと駄目なため、アクセスするファイル名は「xxx.html」ではなく「xxx.cgi」になります。
更にアクセスがあったときの時間で判断しますから、3時59分にアクセスして、4時になった瞬間にパッと変わることはできません。4時になったときに再読み込み（リロード）すれば変わります。

Dpop · Answer

仕様がいま1つイメージできません。

HTMLファイルを差し替えて表示する。と言うのは、表示中のページの一部を、リアルタイムで書き換える。と言う意味でしょうか?

CGIと言うのは、httpdの外部の言語(やシェル)を使って、HTMLを作り出す仕組みです。一度表示してしまったHTMLをリアルタイムで書き換えることはできません。JavaScriptの様なクライアントサイドで動作する仕組みを使用すればできますが。

CGIで行うためには、ページの再表示が必要ですね。再表示させるためには、JavaScriptなどを使ってタイマーをセットすれば良いのでは無いでしょうか。

なので、CGIのと言うよりも、JavaScriptの問題の様な気がします。

時間指定でランダムにhtmファイルを表示したい

#4 です。

この回答への補足

#3 です。

この回答への補足

#1 です。

この回答への補足

Perlで指定時間ごとに表示したいhtmlファイルまでのパスを格納しておき、時間取得関数を使い、○時ならこれを表示するとIF文でかけばいいでしょう。

この回答への補足

仕様がいま1つイメージできません。

この回答への補足

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

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

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

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