Changeset 3409
- Timestamp:
- 07/02/08 16:20:16 (6 months ago)
- Files:
-
- trunk/projects/bos/tools/squid-access-log2csv (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/projects/bos/tools/squid-access-log2csv
r3408 r3409 24 24 (with-loop-split (list in " \\+") 25 25 (when (= 10 (length list)) 26 (format * standard-error* "Reading log line ~D...~C"26 (format *error-output* "Reading log line ~D...~C" 27 27 (incf line-count) #\Return) 28 28 (destructuring-bind (timestamp elapsed client action/code
