Navigation Log - なびろぐ -
2000/01/10

...X680x0 spirit inside...

この日記はGNSで生成しています。
この日記の画像はOPTPiX webDesigner Ver.4で生成しています。

hauN
Go amazon.co.jp

■ご注文リストから■ [一覧]
■Amazonギフト券■ [購入]
GeChic モバイルモニタ On-Lap 1101F レトロ調カラー 11インチ フルHD解像度 IPS液晶 24Hz入力対応 []
GeChic モバイ...
Amazonほしい物リスト


2000/01/10 (月) 雪後晴(片品)

日付埋め込み

_ WDBの出力にページの更新日時を埋め込む方法ですか? SSIで埋め込むのがいちばん手間がかかりません。SSIにすることにとくに問題がないなら、これをどうぞ。

_ 次点は「固定ファイルである?_head.htmlを*_dance.shでcatしている」のを、シェルスクリプトかperlか何かを利用して?_head.htmlに更新日時を埋め込んでからcatするようにする方法です。

_ まずは時刻の埋め込み方。以下リストをreplacenowdate.plとします。


#!/usr/local/bin/perl

($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime( time );
$year += 1900;
$mon += 1;
$replace = sprintf( '%04d/%02d/%02d %02d:%02d:%02d', $year, $mon, $mday, $hour, $min, $sec );
while (<>) {
    s/@NOW/$replace/;
    print;
}

_ これは、


>perl replacenowdate.pl < foo.txt > bar.txt

_ として使います。これは、入力に"@NOW"という文字列があったら、それを現在時刻に置換するというperlスクリプトです。foo.txtに含まれる"@NOW"という文字列が、現在時刻に置換されて、bar.txtに出力されます。

_ ?_head.htmlに"@NOW"という文字列を埋め込んで、


>perl replacedate.pl < ?_head.html > ?_head2.html

_ とすると、?_headに時刻を埋め込んだ?_head2.htmlができるはずです。

_ ここまでくれば、あと一息。?_dance.shの一部を書き換えます。


# index.html生成
    cat sample_head.html dance.$$ sample_tail.html | $NKF -j > index.$$
    mv sample.di ../hina.di

_


# index.html生成
    perl replacenowdate.pl sample_head.html>sample_head2.html
    cat sample_head2.html dance.$$ sample_tail.html | $NKF -j > index.$$
    mv sample.di ../hina.di

_ にしてみましょう・・・できましたか?





メールはこちらへ...[後藤浩昭 / Hiroaki GOTO / GORRY / gorry@hauN.org]

「表紙へ戻る」
「会議室」 「最新版」 「なびろぐindex」 「GNSソースを読む」