Perlあれこれ

2009/1/9 (金)

あけましておめでとうございます。
本年もネットインパクトとYu-ichiを宜しくお願い致します。

HTML文章内で、SSIとPHPが同時に使えない！！

使う必要がないと言ってしまえばそれまでですが・・・。
PHPの知識に乏しいのでSSIでincludeしたいのです :oops:

でも、SSIでは自分自身のファイル名を取得することはできないし
ちょっとプログラミングっぽいことなんて、できません。。。

で、何をしたいかというと
HTMLファイルから同じ名前のテキストファイルを勝手に呼び出して、
その中身をHTML中に書き出すことをやりたいのです。
そこで、SSIとPerlを使ってちょこっと作ってみました。

<!–#exec cmd=”～”–>
で、以下のcgiを読んで実行します。
————————————–
#呼び出し元ファイル名の取得
$HTTP_RUTE = $ENV{‘SCRIPT_NAME’};

#ディレクトリ削除
$HTTP_RUTE =~ s|.*/||;

#拡張子削除
$HTTP_RUTE =~ s/\.([^\.]*)$//;

#テスト用にファイル名を表示
#print “$HTTP_RUTE”;

#cityフォルダ内の該当ファイルを表示
open (IN,”./city/$HTTP_RUTE.txt”);
@file = <IN>;
close (IN);

print “@file”;
————————————–
こんな感じでソースを書いてみたのですが・・・。
どうやら今のところ上手くいってるようですｗ

パスと拡張子の削除を別に行っているのは
カスタマイズがしやすいように・・・というわけではなく
たんに、一緒にする方法がわからなかったのです・・・ :oops: テヘッ

でもこれはこれで汎用性ができたと思います。

実はPerlは数回しかやったことがなく、
初心者同然でしたが、プログラミングの経験があればなんとかなるものですねｗ :neko:

いろいろ調べているうちに、PHPで作ったほうが簡単っぽい気がしてきました :naku:
少しずつですが、PHPの勉強していきたいと思います :neko:

コメント (0)

お客様のニーズに合わせたホームページの作成から制作後のSEO対策までサポート。Flashの制作やCGIの設置代行、バナーの制作など各種WEBコンテンツからメルマガ、ビジネスブログなどのウェブシステムの構築も安心価格でご提供致します。

お手頃価格で結果の出るホームページをつくります。さまざまな業種での制作実績がございます。はじめてウェブサイトをつくる方からネット販売をはじめたい方までお客様のニーズに合わせたホームページを低価格で構築致します。

ネットインパクトでは、手頃な価格で結果の出るホームページを制作しております。お見積り・ご相談は無料です。お気軽にお問合わせ下さい。

コメントはまだありません。

お手頃価格で、機能充実・検索エンジン上位表示のインターネットショッピングサイトを構築いたします。運営教育もあるので初めての方も安心です。