MOROIANU Dragos wrote:
blablabla
4
(
blablabla
Trebuie sa schimb acel 4 in 5 (un numar urmat pe linia
urmatoare de o paranteza rotunda deschisa se
incrementeaza).
Incercand cu perl: $lines =~ s/(5-1)*\(/5\(/;
rezultatul este
Nu pricep ce ai incercat tu in perl
Eu am incercat asa
perl -e '$a=`cat fisier_intrare`; $a =~ s!(|\n)(\d+)\n\(!$1 . ($2 + 1) .
"\n("!ge; print $a'
--
Dan Borlovan
Level 7 Software
_______________________________________________
RLUG mailing list
[email protected]
http://lists.lug.ro/mailman/listinfo/rlug
