[PERL] туплю - разборка лога нгинкса

И всё прочее, что касается HTML
Правила форума
Убедительная просьба юзать теги [code] при оформлении листингов.
Сообщения не оформленные должным образом имеют все шансы быть незамеченными.
Аватара пользователя
Alex Keda
стреляли...
Сообщения: 35462
Зарегистрирован: 2004-10-18 14:25:19
Откуда: Made in USSR
Контактная информация:

Re: [PERL] туплю - разборка лога нгинкса

Непрочитанное сообщение Alex Keda » 2010-01-12 11:51:18

сам догадался уже =)
дополировываю - одно исключение и внос данных в базу =)

Код: Выделить всё

foreach $stroka (@my_owners)
{
        ($domain, $uid, $user) = split(':', trim($stroka));
        $domains{$domain} = $user;
        $users{$user} = 0;
}
#print $users{"h4761"} . "\n";

# пеербираем лог
open(MYLOG, "< " . $ARGV[0]);
while (my $line = <MYLOG>)
{
        ($tmp0, $tmp1, $domain, $tmp2) = split(" ",$line);
        # bootv домен
        if(defined($domains{$domain})){ # домен в хэше есть
                $user = $domains{$domain};
                $users{$user} = $users{$user} + 1;
.............
да, и не выносить лог в массив а сразу с ним работать - быстрей получилось.
так что -400 метров рамы (перл почему-то под массвы рамы жрёт вдвое больше чем файл исходный весил)
Убей их всех! Бог потом рассортирует...

Хостинговая компания Host-Food.ru
Хостинг HostFood.ru
 

Услуги хостинговой компании Host-Food.ru

Хостинг HostFood.ru

Тарифы на хостинг в России, от 12 рублей: https://www.host-food.ru/tariffs/hosting/
Тарифы на виртуальные сервера (VPS/VDS/KVM) в РФ, от 189 руб.: https://www.host-food.ru/tariffs/virtualny-server-vps/
Выделенные сервера, Россия, Москва, от 2000 рублей (HP Proliant G5, Intel Xeon E5430 (2.66GHz, Quad-Core, 12Mb), 8Gb RAM, 2x300Gb SAS HDD, P400i, 512Mb, BBU):
https://www.host-food.ru/tariffs/vydelennyi-server-ds/
Недорогие домены в популярных зонах: https://www.host-food.ru/domains/

Аватара пользователя
hizel
дядя поня
Сообщения: 9032
Зарегистрирован: 2007-06-29 10:05:02
Откуда: Выборг

Re: [PERL] туплю - разборка лога нгинкса

Непрочитанное сообщение hizel » 2010-01-12 11:53:56

а в пыхе помницо масивы и хэши в одну машонку сложили :)
В дурацкие игры он не играет. Он просто жуткий, чу-чу, паровозик, и зовут его Блейн. Блейн --- это Боль.

Аватара пользователя
Alex Keda
стреляли...
Сообщения: 35462
Зарегистрирован: 2004-10-18 14:25:19
Откуда: Made in USSR
Контактная информация:

Re: [PERL] туплю - разборка лога нгинкса

Непрочитанное сообщение Alex Keda » 2010-01-12 12:00:39

та пофигу чё куда сложили
работать реально удобней
Убей их всех! Бог потом рассортирует...

Аватара пользователя
hizel
дядя поня
Сообщения: 9032
Зарегистрирован: 2007-06-29 10:05:02
Откуда: Выборг

Re: [PERL] туплю - разборка лога нгинкса

Непрочитанное сообщение hizel » 2010-01-12 12:09:00

я тебе уже говорил что твой моск испорчен пых пыхом? :roll:
В дурацкие игры он не играет. Он просто жуткий, чу-чу, паровозик, и зовут его Блейн. Блейн --- это Боль.

Аватара пользователя
thefree
лейтенант
Сообщения: 980
Зарегистрирован: 2008-12-29 9:23:19
Откуда: Весёлая Страна

Re: [PERL] туплю - разборка лога нгинкса

Непрочитанное сообщение thefree » 2010-01-12 12:23:23

ту ... лучше чем хеша и массивов реализованных в perl негде не видел.
Не судите меня строго, Я не волшебник, а только учусь!
http://planetbsd.ru - RSS-агрегатор *BSD по Рунету

Аватара пользователя
hizel
дядя поня
Сообщения: 9032
Зарегистрирован: 2007-06-29 10:05:02
Откуда: Выборг

Re: [PERL] туплю - разборка лога нгинкса

Непрочитанное сообщение hizel » 2010-01-12 12:44:18

дурацкий синтаксис в перле, в перле6 первым делом это выправлять собирались
http://perlgeek.de/en/article/5-to-6#post_01
В дурацкие игры он не играет. Он просто жуткий, чу-чу, паровозик, и зовут его Блейн. Блейн --- это Боль.

zg
полковник
Сообщения: 5845
Зарегистрирован: 2007-12-07 13:51:33
Откуда: Верх-Нейвинск

Re: [PERL] туплю - разборка лога нгинкса

Непрочитанное сообщение zg » 2010-01-12 19:36:34

thefree писал(а):ту ... лучше чем хеша и массивов реализованных в perl негде не видел.
в плане?
hizel писал(а):а в пыхе помницо масивы и хэши в одну машонку сложили :)
пых, милый пых :cry:

Аватара пользователя
thefree
лейтенант
Сообщения: 980
Зарегистрирован: 2008-12-29 9:23:19
Откуда: Весёлая Страна

Re: [PERL] туплю - разборка лога нгинкса

Непрочитанное сообщение thefree » 2010-01-13 9:21:31

zg писал(а):
thefree писал(а):ту ... лучше чем хеша и массивов реализованных в perl негде не видел.
в плане?
Работы с ними.
Не судите меня строго, Я не волшебник, а только учусь!
http://planetbsd.ru - RSS-агрегатор *BSD по Рунету