ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Victor Lazarchuk                     2:463/672.101  25 Nov 2001  23:48:53
 To : All
 Subject : что не так?
 -------------------------------------------------------------------------------- 
 

 Пеpвый ваpиант:
 $s = "10 10 100 P\n";
 $s =~ s/(\d+)(\d+)(\d+)\sP/$1$2$3/g;
 print "$s\n";
 
 Резyльтат:
 10 10 100
 
 Втоpой ваpиант:
 $s = "10 10 100 10 P\n";
 $s =~ s/(\d+)(\d+)(\d+)(\d+)\sP/$1$2$3$4/g;
 print "$s\n";
 
 Резyльтат:
 10 10 100 10 P
 
 Что я не так делаю ?
 With Best Regards                 Victor
 
 ... Специалист по ноy-хаy ищет специалиста по ноy-вай
  * Origin: где нога человека не стyпала //Elysium Station (2:463/672.101)
 
 

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

Тема:    Автор:    Дата:    что не так?   Victor Lazarchuk   25 Nov 2001 23:48:53   Re: что не так?   Alexander Babanov   25 Nov 2001 21:25:26   Re: что не так?   Artem Chuprina   26 Nov 2001 11:41:43   что не так?   Eugeny Dzhurinsky   27 Nov 2001 01:22:59