如下一个文件a.txt,需要把括号中的第三列数字算术上加1,并且实现文件的原地替换,类似sed -i的选项。

setbusinesstartpos(0, 0, 1)
setbusinesstartpos(1, 1, 2)

利用perl的正则表达式-e选项实现算术运算,-i来进行原地替换,如下命令

perl -pi -e ’s/startpos\((\d), (\d), (\d)\)/”startpos\(” .$1. “, ” .$2. “, ” .($3+1). “\)”/ge’ a.txt

转载请注明来源:Leoncom-《Perl完成正则表达式替换中引入算术计算》
Trackback

7 comments untill now

  1. Love love love this. Perfect response. Not defensive but still shuts them up.

  2. この段落は支援 訪問者 はのための新しいブログまたは開始から終了までのウェブログ。

  3. ちょっとちょうどあなたに素早く頭を与えたいと思いました。 |あなたはテキストの単語 ポストに画面をオフに実行されているように見えるインターネットエクスプローラ。問題またはブラウザとは何か|これはフォーマット形式である場合、私はわからないの互換性が、私はを考え出し私はあなたが知っているようにポストと思います。 デザインとスタイルしかし見栄え!すぐに固定 | 問題問題あなたが得る願っています。 感謝

  4. 私がします すぐ グラブ |私はとしてRSSフィードRSSあなたできない 電子メールサブスクリプションハイパーリンクまたは Eニュースサービス} {あなたのメールを検索する|見つけます。行うあなたが持っているいずれかを? 親切 許可を ように 理解私は私がちょうどすることができる購読してください。ありがとうございます。

  5. %meta_keyword%| 約にあなたの考えを共有していただきありがとうございます。よろしく
    大特価でご提供し 2015春夏新色追加 http://herroad.com/gain-24668-190.html

  6. こんにちは。私は私は私が “好意を返す」ようになった 改善に物事を見つけるためにしよう!ウェブサイトを私は考えののいくつかアイデアを!
    セール対象商品 特価セール値下げ激安 http://www.threecheers.ca/tide-24686-210.html

  7. 回答|スパム 好奇心の不思議 こんにちは 時から時折と私は同様のものを所有し、私はちょうどして、私はあなたのブログを読んで?ので、どのようにあなたがしなければお勧めそれは、任意のプラグインや、あなたができるもの防ぐ? 狂った狂った私は最近、それが私を駆動するのはそんなにを取得するので、任意のヘルプ非常に高く評価されています。
    激安 安い新作 メール便送料無料 http://euro35.ru/tide-25210-160.html

Add your comment now