The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]

форумы
правила/FAQ
поиск
регистрация
вход
слежка
RSS



Версия для распечатки Пред. тема | След. тема
Новые ответы [ Отслеживать ]
perl, !*! omar, 27-Фев-08, 18:56  [смотреть все]
Добрый день всем... Помогите пожалуйста ...я в Перл не особенно силен....
есть файлик с содержанием скажем
81.177.140.51   192.168.3.94    7109
74.53.216.6     192.168.3.52    2082
74.53.216.6     192.168.3.52    744694
89.202.157.202  192.168.3.60    516


нужно посчитать суммы цифр с одинаковыми IP во втором столбце...
количество строк в файле каждый раз разное ...

Ответить | Сообщить модератору
  • perl, !*! angra, 19:38 , 27-Фев-08 (1)
    $ cat a.txt
    81.177.140.51   192.168.3.94    7109
    74.53.216.6     192.168.3.52    2082
    74.53.216.6     192.168.3.52    744694
    89.202.157.202  192.168.3.60    516

    perl -ane '$a{$F[1]}+=$F[2];END{print "$_ $a{$_}\n" foreach keys %a}' a.txt
    192.168.3.94 7109
    192.168.3.52 746776
    192.168.3.60 516

    Ответить | Сообщить модератору

Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей 		Created 1996-2025 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру