ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Leonid Subbotin                      2:5007/16.1    16 Sep 2000  12:10:41
 To : Dmitry Ponomarjov
 Subject : Ламерский вопросик
 -------------------------------------------------------------------------------- 
 

 
  DP> есть конструкция вида
  DP> while (<>)
  DP> {
  DP> ....
  DP> $var;  # кусок $_ , например "Vasia"
  DP> ....
  DP> }
  DP> надо проверить была ли среди все предыдуших $var идентичная текущей
  DP> если да то print 'ha-ha-ha-ha' ; если нет то print "he-he-he-he"; , и
  DP> так для каждой $var
 
 undef %bla;
 while(<>){
 ...
 exists $bla{$var} ? print 'ha-ha-ha-ha' : print 'he-he-he-he';
 $bla{$var}++;
 ...
 }
 
  DP> зы: Пробывал создавать массив и сравнивать каждый его элемент с $var,
  DP> и если ни чего не совпадало добавлять $var в конец массива , если нет
  DP> то что то еше , но ни чего не получилось , help !!! как сделать это с
  DP> массивом или с чем нибудь еше :)))
 
 perldoc perlfunc
 
                                                        Всегда с вами Sln !
 --- GoldED+/W32 1.1.4
  * Origin: Sln Station (2:5007/16.1)
 
 

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

Тема:    Автор:    Дата:    Ламерский вопросик   Dmitry Ponomarjov   15 Sep 2000 18:27:18   Ламерский вопросик   Leonid Subbotin   16 Sep 2000 12:10:41