Perl 文字 / 字串 取代(Regex)

感謝 洪朝貴 老師 寫的 Regular Expression.

老師的教導, 而學生當時沒有好好學習.. 需要用到時才偷偷的溜回去看老師的網頁..

真是慚愧... 慚愧之餘.... 還是趕快把語法記下來.. :p

  • 取代法1: perl -pe 's/<?/<?php/g' 檔名
  • 取代法2: perl -pe 's/<?/<?php/g' action.php > action-new.php
  • 取代法3: perl -i -pe 's/<?/<?php/g' `find . -iname '*htm*'`

取代法3 後面的 find.. 可以改用其它你想改的檔名(ex: 改成 *.php), 以上三個範例都是要將 <? 改成 <?php 的做法..

取代法3 能將所有目錄中.你想取代的檔案都取代到(靠自己多嘗試學習吧!!)

此命令是要將 InnoDB 取代成 MyISM 並將原始檔案備份成 filename.sql.bak

perl -i.bak -pe 's#InnoDB#MyISAM#g' filename.sql


關於 Tsung

對新奇的事物都很有興趣, 喜歡簡單的東西, 過簡單的生活.
本篇發表於 My_Note-Programming。將永久鏈結加入書籤。

Perl 文字 / 字串 取代(Regex) 有 1 則回應

  1. Drake 說道:

    awesome!
    我之前都是發懶,就用 sed 來做取代 :p

發表迴響

這個網站採用 Akismet 服務減少垃圾留言。進一步瞭解 Akismet 如何處理網站訪客的留言資料