diff options
| author | Oscar Najera <hi@oscarnajera.com> | 2025-04-28 00:28:13 +0200 |
|---|---|---|
| committer | Oscar Najera <hi@oscarnajera.com> | 2025-04-28 00:28:13 +0200 |
| commit | 69111ed741338ff940bbd598388fbbd2519cd0b9 (patch) | |
| tree | 50f4f1fa79ff66d277cf225108b5d9bc5728c9a5 /webstats/logparse.lisp | |
| parent | 78af58cfd32e3f9e7cd5c36716fd2d971e01102b (diff) | |
| download | scratch-69111ed741338ff940bbd598388fbbd2519cd0b9.tar.gz scratch-69111ed741338ff940bbd598388fbbd2519cd0b9.tar.bz2 scratch-69111ed741338ff940bbd598388fbbd2519cd0b9.zip | |
robots visits
Diffstat (limited to 'webstats/logparse.lisp')
| -rw-r--r-- | webstats/logparse.lisp | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/webstats/logparse.lisp b/webstats/logparse.lisp index 71864d8..b7e0577 100644 --- a/webstats/logparse.lisp +++ b/webstats/logparse.lisp @@ -26,7 +26,7 @@ (ppcre:register-groups-bind ((#'parse-integer date) month (#'parse-integer year hour min sec)) ("(\\d{2})/(\\w{3})/(\\d{4}):(\\d{2}):(\\d{2}):(\\d{2})" timestr) (- - (encode-universal-time sec min hour date (gethash month +short-month-names+) year) + (encode-universal-time sec min hour date (gethash month +short-month-names+) year 0) #.(encode-universal-time 0 0 0 1 1 1970 0)))) (= (time-to-posix "02/Mar/2025:00:00:16 +0000") 1740870016) @@ -37,7 +37,6 @@ "20.171.207.185 - - [02/Mar/2025:00:00:16 +0000] \"GET /pub/hi/scratch/plain/AoC2023/day02/input?h=simpler&id=e2f5b6c2d5bb67013ba1b612252781e4cd9b6fe1 HTTP/1.1\" 200 7017 \"-\" \"Mozilla/5.0 AppleWebKit/537.36 (KHTML, like Gecko; compatible; GPTBot/1.2; +https://openai.com/gptbot)\"") (list ip remote-log userid date method path version status length referrer agent)) - (defvar *sqlite* (sqlite:connect "/scratch/titan/apache2/cgit-logs.sqlite")) (sqlite:disconnect *sqlite*) |