七行プログラミング

七行プログラミング (452ﾚｽ)
上下前次1-新
抽出解除ﾚｽ栞

ﾘﾛｰﾄﾞ規制です｡10分ほどで解除するので､他のﾌﾞﾗｳｻﾞへ避難してください｡

271(1): 04/03/12 09:36 ID:??? AAS
● SSI での使用

__END__ トークン以下に
%s<br />all:%06d today:%03d yesterday:%03d

HTML ファイルの body 要素内に


● JavaScript 経由で CGI プログラムとして使用

__END__ トークン以下に
function writeCount() {
　　document.write("%s<br />all:%06d today:%03d yesterday:%03d");
}

HTML ファイルの header 要素内に
<script src="/cgi-bin/7rwcntr.cgi?1" type="text/javascript"></script>

body 要素内に
<script type="text/javascript">
</script>

278: 266 04/03/15 14:12 ID:jJ3gsLA0(1) AAS
#! /usr/bin/perl
sub r{$r=$_[0]?"tab-separated-values\nContent-Disposition: attachment;filenam".
"e=log.csv":"plain";print"Content-Type: text/$r\n\n"}if(($a,$f,$t,$k)=split/&/,
$ENV{QUERY_STRING}){r $a;for($f...$t){/^\d{8}$/x&&open F,"$_.txt";($k?/\Q$k/:1)
&&(print)while<F>}}else{r;s/^\d$/0$&/for($s,$n,$h,$d,$m,$y)=localtime;$y+=1900;
$m++;$m=~s/^\d$/0$&/;open F,">>$y$m$d.txt";print F join("\t",$h,$n,$s,@ENV{
REQUEST_URI,REMOTE_ADDR,HTTP_USER_AGENT,HTTP_REFERER}),"\n"}

>>266です。
>>268はアクセスログ記録モードで呼び出したときもCSVのダウンロードダイアログが出る
という致命的なバグがありました。すみません。

バグ修正と、さらにパラメータで画面に表示/ダウンロードを選択できるようにしました。
また、REQUEST_URIも記録するようにしたので、サイト全体の解析にも使えるようになったと思います。
スクリプト名は他にあわせて、7accesslog.cgi と変更しようと思います。

こんなので掲載していただけるのであれば是非お願いします。
このスレのおかげで完成したと思っているので、私としては権利等の主張をする
つもりはありませんのでGPLあたりの他のスクリプト同様のライセンスにしてください。

■使用法
・記録時はSSI等で呼び出します。>>271さんみたいにJavaScriptでも呼び出せそうな気はします。
・表示およびダウンロード時はパラメータをつけて普通に呼び出します。
パラメータなし　アクセスログを記録。
　　日付.txt に時,分,秒,REQUEST_URI,REMOTE_ADDR,HTTP_USER_AGENT,HTTP_REFERER を記録します。
パラメータあり　アクセスログを表示/ダウンロード
　　第1パラメータ・・・ 0:表示　1:ダウンロード
　　第2パラメータ・・・ログの取得開始日(yyyymmdd)
　　第3パラメータ・・・ログの取得終了日(yyyymmdd)
　　第4パラメータ・・・ログ取得時の絞込みキーワード(省略すると全件取得)
　　(例) 外部ﾘﾝｸ[cgi]:hoge.com
　　この例では、2004年3月1日〜2004年3月31日までの「MSIE」を含むログがダウンロードされます。

上下前次1-新書関写板覧索設栞歴

ｽﾚ情報赤ﾚｽ抽出画像ﾚｽ抽出歴の未読ｽﾚｱﾎﾞﾝOFF

ぬこの手ぬこTOP 0.015s