ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Afinogen                             2:5020/400     03 Nov 2000  19:24:20
 To : All
 Subject : Hесложный вопрос к специалистам
 -------------------------------------------------------------------------------- 
 

 Здравствуйте уважаемые специалисты !
 Помогите пожалуйста разобраться со следующим вопросом:
 Имеется :
 $q='mama:ty4 rama=45t papa=32 lama=mamumba ';
 $a1='papa=\w+|mama';
 $q=~s/$a1//ig;
 это нормально отрывает от строки элементы "mama" и "papa=32"
 (как и должно быть...).
 Вопрос :
 как корректно сделать обратную операцию, что бы она не удаляла
 эти элементы , а наоборот вычищала все остальное , что бы в итоге
 получилось :
 $q='mama papa=32 ';
 Заранее благодарен за ответ ( можно по майл на адрес: usee96@aport.ru )
 
 --- ifmail v.2.15dev5
  * Origin: has no name (2:5020/400)
 
 

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