ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Dmitriy Kuvshinov                    2:5020/400     01 Dec 2000  16:00:57
 To : Kozachenko Alexey
 Subject : Re: два массива
 -------------------------------------------------------------------------------- 
 

 KA> А так разве нельзя ($mass1[1], $mass1[17]) =
 KA> ($mass2[0], $mass2[1]);
 KA> Я не пробовал, но по-моему так можно.
 
 Черт его знает... походу гораздо сложнее тут все.
 
 Я так сделал(размерность $#mass1 >= $#mass2, т.е. для голосовалки оно будет 
 занимать n^2 байтов в памяти если оба массива равны):
 
 foreach $line1(@mass1){
   foreach $line2(@mass2){
    if($line1=~m/^(.*)$line2\.html\">(.*)<\/a> (\d+)/ig){
       print "$1$line2\.html\">$2<\/a> ",$3+1;
       $var=$count++;
       push(@hrr, $var)
    }
    else{print $line1 if ($hrr[0]==1);}
    $#hrr=-1;
   }
 }
 
 а идея такая, есть n статеек, по ним нада устроить рейтинг, причем с каждого 
 айпишника можно голосовать 1 раз, т.е. для каждой статьи по файлику с 
 айпишниками... ну и соотвественно можно добавлять новые статейки... кажется
 этот 
 код делает то, что мне нужно...
 
 Спасибо тем не менее, я с таким синтаксисом не знаком еще, посмотрю.
 
 Дима
 -- 
 Отправлено через сервер Talk.Ru - http://www.talk.ru
 --- ifmail v.2.15dev5
  * Origin: Talk.ru (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    два массива   Dmitriy Kuvshinov   01 Dec 2000 14:21:03   Re: два массива   Kozachenko Alexey   01 Dec 2000 14:33:18   Re: два массива   Dmitriy Kuvshinov   01 Dec 2000 16:00:57   два массива   Albert N. MICHEEV   01 Dec 2000 19:30:03   ха   Dmitriy Kuvshinov   03 Dec 2000 17:36:41