|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Eugeny Dzhurinsky 2:4641/666.534 27 Nov 2001 01:22:59 To : Victor Lazarchuk Subject : что не так? -------------------------------------------------------------------------------- 25 Hоя 01 22:48, Victor Lazarchuk -> All: VL> $s = "10 10 100 10 P\n"; VL> $s =~ s/(\d+)(\d+)(\d+)(\d+)\sP/$1$2$3$4/g; VL> print "$s\n"; VL> Резyльтат: VL> 10 10 100 10 P $s=~s/(\d+)\s+(\d+)\s+(\d+)\s+(\d+)\s+P/$1$2$3$4/g; С pегаpдами, Eugeny --- * Origin: 1,3,7,15 пальцев... (2:4641/666.534) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/46863c02dd56.html, оценка из 5, голосов 10
|