The OpenNET Project / Index page

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

форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка  RSS
"2 столбца суммирование"
Вариант для распечатки Архивированная нить - только для чтения! 
Пред. тема | След. тема 
Форумы Программирование под UNIX (Public)
Изначальное сообщение [Проследить за развитием треда]

"2 столбца суммирование"
Сообщение от YaroslavSSS emailИскать по авторуВ закладки on 19-Июн-03, 12:46  (MSK)
Есть таблица:
172.16.10.21    20
172.16.10.21    10
172.16.10.21     0
192.168.0.1     30
192.168.0.2     10
192.168.0.2     10
возникла необходимость просуммировать данные по второму столбцу, т.е. получить:
172.16.10.21     30
192.168.0.1      30
192.168.0.2      20
    Не могли бы Вы подсказать как решить данную проблему.Если можно с примерами.
  Рекомендовать в FAQ | Cообщить модератору | Наверх

 Оглавление

Индекс форумов | Темы | Пред. тема | След. тема
Сообщения по теме

1. "2 столбца суммирование"
Сообщение от XMan Искать по авторуВ закладки on 19-Июн-03, 15:43  (MSK)
На перле - через обычный хеш:

%hash;
while (<>) {
  chomp; ($k,$v)=split(/\s+/);
  $hash{$k} += $v;
};

Вывод результата:

foreach $k (keys %hash) {
    print "'$k' => '$hash{$k}'\n";
};

  Рекомендовать в FAQ | Cообщить модератору | Наверх

2. "2 столбца суммирование"
Сообщение от Parish Искать по авторуВ закладки on 19-Июн-03, 15:50  (MSK)
#!/usr/bin/perl -w
$str=<<EOF;
172.16.10.21    20
172.16.10.21    10
172.16.10.21    0
192.168.0.1    30
192.168.0.2    10
192.168.0.2    10
EOF
while($str=~/([0-9.]+)\s+(\d+)/g){
$IP{$1}+=$2;
}
for $key (sort keys %IP ){
print "$key $IP{$key} \n";
}

и впредь с глупостями не приставай

  Рекомендовать в FAQ | Cообщить модератору | Наверх


Удалить

Индекс форумов | Темы | Пред. тема | След. тема
Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.




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

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