ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Alexey Luckyanchikov                 2:5020/400     19 Jan 2001  22:27:40
 To : All
 Subject : Работа с хешами
 -------------------------------------------------------------------------------- 
 

 Привет, all!
 
 А не поскажет ли кто, как можно перебрать хеш хешей? Т.е. есть такой кусок:
 while (<LOG>) {
   foreach $host (@readers) {
    if (/($host)\sgroup\s(\S+)\s(\d+)/) {
       $arts{$1}{$2}+=$3;
    }
   }
 }
 Далее нужно перебрать все элементы %arts. Как это можно сделать?
 
 -- 
 Sincerely,                                      e-mail: alexl@hobbiton.org
 Alexey Luckyanchikov
 --- ifmail v.2.15dev5
  * Origin: Alkar Teleport News Server (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор