Saját beviteli szöveg a következő 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

a $ 1 és $ 6 helyett \ 1 és \ 6, nézd meg, ez segít. Használja egyetlen idézőjelbe a kódot, ha már ott is vannak ablakok.

Kösz, de ez nem működik. By the way, én nem használ \ 6, hanem \ n6.

Használja 1 $ helyett \ 1

Módosítsa a parancsot az alábbiak szerint ...
perl -p-e "s / func_a \ ((.*)? \); / func_b \ ($ 1, \ n6 \); / s" <file | more

Igen, régen 1 $ helyett \ 1. Azt hiszem, ez nem számít.
Ha meglesz a mintákat, amelyek nem rendelkeznek új vonal őket, mint például:

  func_a(3);

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

A probléma az, hogy a perl -p, akkor csak olvasás és vizsgálata egy vonal egy időben. Így a minta mérkőzés nem kezdik alkalmazni minden, ami közrefogja egy sort határt, még akkor is, ha a / s modifier. Meg tudod oldani, hogy az olvasó minden olyan vonalon, egyszerre, a perl -0.777 Vagy valami hasonló.

Lásd még a Perl FAQ, amelynek részletes vita folyt erről a témáról.

perl kellett volna nekem egy hiba / figyelmeztetés, mert az s módosítót nem alkalmazható-p.
Különben is, itt van, amit én megpróbáltam, de ezúttal kapok semmit outputted:

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"