Поиск и замена нескольких выражений в командной строке Perl

Я использую Perl для поиска и замены нескольких регулярных выражений :Когда я выполняю следующую команду, я получаю сообщение об ошибке:

prompt> find "*.cpp" | xargs perl -i -pe 's/##(\W)/\1/g' -pe 's/(\W)##/\1/g'
syntax error at -e line 2, near "s/(\W)##/\1/g"
Execution of -e aborted due to compilation errors.
xargs: perl: exited with status 255; aborting

Наличие нескольких -eдопустимо в Perl, тогда почему это не работает? Есть ли этому решение?

16
задан sarnold 3 May 2012 в 02:01
поделиться