七行プログラミング (452レス)
上
下
前
次
1-
新
268
(1)
:
266
04/03/05 18:15
ID:EBEJkXEP(1)
AA×
>>267
>>267
[
240
|
320
|480|
600
|
100%
|
GIF
|
べ
|
レス栞
|
レス消
]
268: 266 [] 04/03/05 18:15 ID:EBEJkXEP しっかりと読みました。 >>267さんが短くしてくれたおかげで、妥協した機能がつけれました。 日付の範囲指定を可能にして、データをtab区切りで記録して ファイルを表示するのではなくCSV(TSV)としてDLするようにしてみました。 #! /usr/bin/perl print"Content-Disposition: attachment;filename=log.csv;\nContent-Type: text/t". "ab-separated-values\n\n";if(($f,$t,$k)=split/&/,$ENV{QUERY_STRING}){for($f...$ t){/^\d{8}$/x&&open F,"$_.txt";($k?/\Q$k/:1)&&(print)while<F>}}else{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{REMOTE_ADDR,HTTP_USER_AGENT, HTTP_REFERER}),"\n"} >>267さんのにただ付け足した感じです。 それでも、たった一日でものすごい勉強になりました。 http://medaka.5ch.net/test/read.cgi/php/1036141603/268
しっかりと読みました さんが短くしてくれたおかげで妥協した機能がつけれました 日付の範囲指定を可能にしてデータを区切りで記録して ファイルを表示するのではなくとしてするようにしてみました さんのにただ付け足した感じです それでもたった一日でものすごい勉強になりました
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 184 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
ぬこの手
ぬこTOP
0.034s