|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Denis Balashov 2:5010/103.12 12 Apr 2001 22:41:30 To : All Subject : скорость - как соптимизировать --------------------------------------------------------------------------------
1) Есть, к примеру, лог от сквида. Вот одна строка:
980622109.615 2519 212.57.140.227 TCP_REFRESH_HIT/200 12549 GET
http://www.winamp.com/customize/component/2000/8/11/P/small_image/Space_Rocks.j
pg - DIRECT/www.winamp.com image/jpeg
далее, по ip нужно вытащить всю информацию. Конструкция типа
if($s=~/(\d+.\d+\s*)(\d+\s)($ip\s)(\w+)(\/)(\d+)(\s)(\d+)(\s)(\w+)(\s)(.*)(\s
-\s)(\w+)(\/)(.*)(\s)(.*)(\n)/) {
работает не слишком быстро. Где и что можно поменять, чтобы работало побыстрее и
информация выдиралась та, что нужно - время, ip, урлы, контент, TCP_REFRESH
и т.д?
2) какой функцией перевести дату/время вида 980622109.615 в обычную,
удобоваримую форму? :-)
Denis.
---
* Origin: Разбираю игрушки на запчасти... (2:5010/103.12)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/38113ad5ea0e.html, оценка из 5, голосов 10
|