ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Alex Bachin                          2:5020/400     08 Aug 2001  09:54:55
 To : All
 Subject : что-то я туплю совсем.... посмотрите, а?
 -------------------------------------------------------------------------------- 
 

 Вот такой кусочек. Hадо найти строки, у которых вначале
 идут два заданных совпадения:
 Должна напечататься вторая строка....
 А почему-то не находится ничего :(((((
 
 my @raws = 
 (
   "abc,1,first line",
   "def,2,second line",
   "fgh,3,third line"
   "xyz,25,fourth line"
 );
 my $aaa = "def";
 my $bbb = 2;
 foreach ( @raws ) 
 {
   if ( /^\Q$aaa,\Q$bbb,/ )
   {
     print "$_\n";
   }
 }
 
 Простите, это вопрос для .chainik, но на talk.ru нет этой группы
 
 -- 
 Отправлено через сервер Talk.Ru - http://www.talk.ru
 --- ifmail v.2.15dev5
  * Origin: Talk.Ru (2:5020/400)
 
 

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