Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Помогите с выбором инф. из файла 
:(
    Опции темы
pavel87
Дата 20.4.2007, 16:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 2
Регистрация: 10.2.2007

Репутация: нет
Всего: нет
Здравствуйте.
Подскажите пожства вариант решения такой задачи: хотя бы алгоритм 
есть файл вида
Код

dst_ip src_ip bytes_count
192.168.100.5 211.1.1.1 555
192.168.100.5 129.42.60.212 5701
192.168.100.8 143.166.224.202 104
192.168.100.8 123.123.123.123 2575
192.168.100.9 143.166.224.202 26299
192.168.100.9 143.166.224.202 5237

надо подсчитать сумму байт для каждого  dst_ip


Это сообщение отредактировал(а) pavel87 - 20.4.2007, 16:34
PM MAIL   Вверх
JAPH
Дата 20.4.2007, 17:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 312
Регистрация: 8.1.2007
Где: Ленобласть

Репутация: 3
Всего: 23
Один из вариантов:
Код
use strict; use warnings;
my %t;
while (<>) { $t{$1} += $2 if /^([.\d]+)\s+[.\d]+\s+(\d+)$/ }
print "$_ => $t{$_}\n" for keys %t;




--------------------
Что непонятно - спрашиваем smile
PM MAIL ICQ   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0391 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.