Моя ввода текста имеет следующие pattens:

  func_a(3,
         4,
         5);

   
  func_b(3,
         4,
         5,
         6);

perl -p -e "s/func_a\((.*)?\);/func_b(\1,\n6)/s" < file |more

использовать $ 1 и $ 6 вместо \ 1 и \ 6, видеть, если это помогает. Используйте одиночные кавычки вокруг кода, если вы находитесь на окнах.

Спасибо, но это не работает. Кстати, я не с помощью \ 6, а \ N6.

Используйте $ 1, \ 1

Изменить команду как ниже ...
Perl -П-Е ", с / func_a \ ((.*)? \); / func_b \ ($ 1, \ N6 \); / S" <файл | подробнее

Да, я использовал $ 1, \ 1. Я думаю, Вы не почувствуете никакой разницы.
Когда я моделях, которые не имеют новых линий в них, такие, как:

  func_a(3);

perl -p -e "s/func_a\((.*)?\);/func_b($1,\n6)/s" < file |more

Проблема заключается в том, что с Perl -P, вы только чтение и изучение линии одновременно. Таким образом, структура матча не применяются ни к чему, которые straddles линии границы, даже если у вас есть / с модификатором. Вы можете решить, что, прочитав все линии сразу, с Perl -0777 Или что-то эквивалентное.

См. также Perl Вопросы, которые подробно обсудить эту тему.

Perl следует дали мне ошибку / предупреждение, потому что с модификатором не применяется к-р.
Во всяком случае, вот то, что я попробовал, но на этот раз я ничего не получит выдавали:

perl -e -0777 "s/func_a\((.*)?\);/func_b(\1,\n6)/s" < file |more

perl -e "BEGIN {$/=undef} s/func_a\((.*)?\);/func_b(\1,\n6)/s"