URL: https://linuxfr.org/forums/astucesdivers/posts/perl-passer-de-sed-a-perl
Title: [Perl] Passer de sed a perl
Authors: Payrard stephane
Date: 2003年07月07日T00:59:50+02:00
Tags: 
Score: 0
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
</div><div class="naked_ctrl">
<form action="/index.cgi/contrast" method="get" name="gate">
<p><a href="http://altstyle.alfasado.net">AltStyle</a> によって変換されたページ <a href="httpS://linuxfr.org/forums/astucesdivers/posts/perl-passer-de-sed-a-perl.md">(-&gt;オリジナル)</a>
/ <label>アドレス: <input type="text" name="naked_post_url" value="httpS://linuxfr.org/forums/astucesdivers/posts/perl-passer-de-sed-a-perl.md" size="22" /></label> <label>モード: <select name="naked_post_mode">
<option value="default">デフォルト</option>
<option value="speech">音声ブラウザ</option>
<option value="ruby">ルビ付き</option>
<option value="contrast" selected="selected">配色反転</option>
<option value="larger-text">文字拡大</option>
<option value="mobile">モバイル</option>
</select>
<input type="submit" value="表示" />
</p>
</form>
</div>