読者です 読者をやめる 読者になる 読者になる

perl の文字列置換

僕はいままでこんな感じで置換処理を行っていたんだ。

find . -name '*.inc' | xargs sed -i.bak  -e 's/HOGEHOGE/hogehoge/g' 
find . -name '*.tpl' | xargs sed -i.bak  -e 's/AWAAWA/awaawa/g'
find . -name '*.html' | xargs sed -i.bak  -e 's/キーワード/きーわーど/g'

でもperlを使うとこんなにカンタンに置換ができるのだ。

perl -pi -e 's/SAMPLE/AAAA/g' ./*.inc ./*.php ./*.ini
perl -pi -e 's/Sample/Aaaa/g' ./*.inc ./*.php ./*.ini
perl -pi -e 's/sample/aaaa/g' ./*.inc ./*.php ./*.ini
  • p と -i pは引数がもてる。continueの意
  • i は変換の意

多用しようと思う。