Pour les pros de sed qui passent à Perl: Utiliser les flags de boucles implicites de lecture ligne par ligne -n et -p. La premiere imprime la ligne, pas la seconde. Examples: perl -pe 's/foo/bar/g'; # pour chaque ligne, replace "foo" par "bar" et imprime perl -ne 'print if m/foo/' # imprime les lignes qui matchent "foo" -- http://paris.mongueurs.net