過濾重複字元
perl -e '$_=; @in = split; if (@in < 100)++ } @in; print join "\n", @out;}'統計全文單詞數 （同
awk '} end' input）
perl -ne 'map } (split); end\n")}}' input統計文字中某段中的單詞數 （awk ' nr>15 && nr<17 } end ' input）
判斷字串是不是ip，是則列印。
echo "1.1.1.1" | perl -ne 'print if /\b(?:(?:(?:[01]?\d|2[0-4]\d|25[0-5])\.)(?:[01]?\d|2[0-4]\d|25[0-5]))\b/'統計行數 (速度最快的還是wc -l命令)
perl -ne 'end' file比較兩個檔案
awk 'nr==fnr nr>fnr&&!a[$0]' file1 file2 找出檔案2中不同的值
awk 'nr==fnr nr>fnr&&a[$0]' file1 file2 找出兩檔案中相同的值
替換
將所有c程式中的foo替換成bar，舊檔案備份成.bak
perl -p -i.bak -e 's/\bfoo\b/bar/g' *.c很強大的功能，特別是在大程式中做重構。記得只有在ultraedit用過。 如果你不想備份，就直接寫成
perl -p -i -e或者更簡單 perl -pie，恩，pie這個單詞不錯
將每個檔案中出現的數值都加一
perl -i.bak -pe 's/(\d+)/ 1 + $1 /ge' file1 file2 ....將換行符\r\n替換成\n
perl -pie 's/\r\n/\n/g' file同dos2unix命令。
將換行符\n替換成\r\n
perl -pie 's/\n/\r\n/g' file同unix2dos命令。
取出檔案的一部分
顯示欄位0-4和字段6，欄位的分隔符是空格
perl -lane 'print "@f[0..4] $f[6]"' file很好很強大，同 awk 'print $1, $2,$3, $4, $5, $7'。引數名稱lane也很好記。
如果字段分隔符不是空格而是冒號，則用
perl -f: -lane 'print "@f[0..4]\n"' /etc/passwd顯示start和end之間的部分
perl -ne 'print if /^start$/ .. /^end$/' file恐怕這個操作只有sed才做得到了吧……
相反，不顯示start和end之間的部分
perl -ne 'print unless /^start$/ .. /^end$/' file顯示開頭50行：
perl -pe 'exit if $. > 50' file同命令 head -n50
不顯示開頭10行：
perl -ne 'print unless 1 .. 10' file顯示15行到17行： （sed -n '15,17p' file; awk 'nr>15 && nr<17' file）
perl -ne 'print if 15 .. 17' file每行取前80個字元：
perl -lne 'print substr($_, 0, 80) = ""' file每行丟棄前10個字元：
perl -lne 'print substr($_, 10) = ""' file搜尋
查詢comment字串：
perl -ne 'print if /comment/' duptext這個就是普通的grep命令了。
查詢不含comment字串的行：
perl -ne 'print unless /comment/' duptext反向的grep，即grep -v。
相同的功能就要用到egrep了，語法比較複雜，我不會……
計算
計算欄位4和倒數第二欄位之和：
perl -lane 'print $f[4] + $f[-2]'要是用awk，就得寫成 awk ''
排序和反轉
檔案按行排序：
perl -e 'print sort <>' file相當於簡單的sort命令。
檔案按段落排序：
perl -00 -e 'print sort <>' file多個檔案按檔案內容排序，並返回合併後的檔案：
perl -0777 -e 'print sort <>' file1 file2檔案按行反**
perl -e 'print reverse <>' file1相應的命令有嗎？有……不過挺偏，tac（cat的反轉）
數值計算
10進製轉16進製制：
perl -ne 'printf "%x\n",$_'10進製轉8進製： perl -ne 'printf"%o\n",$_'
16進製制轉10進製：
perl -ne 'print hex($_)."\n"'8進製轉10進製：
perl -ne 'print oct($_)."\n"'簡易計算器。
perl -ne 'print eval_r($_)."\n"'其他
啟動互動式perl：
perl -de 1檢視包含路徑的內容：
perl -le 'print for @inc'備註
-0《數字》
(用8進製表示)指定記錄分隔符($/變數)，預設為換行
-00段落模式，即以連續換行為分隔符
-0777
禁用分隔符，即將整個檔案作為乙個記錄
-a自動分隔模式，用空格分隔$_並儲存到@f中。相當於@f = split ''。分隔符可以使用-f引數指定
-f指定-a的分隔符，可以使用正規表示式
-e執行指定的指令碼。
-i《副檔名》
原地替換檔案，並將舊檔案用指定的副檔名備份。不指定副檔名則不備份。
-l對輸入內容自動chomp，對輸出內容自動新增換行
-n自動迴圈，相當於 while(<>)
-p自動迴圈+自動輸出，相當於 while(<>)
Perl 命令列引數
一 perl中的命令列引數 perl提供了乙個特殊的內建陣列 argv來存放使用者從命令列輸入的引數 功能跟c c 的命令列引數一樣，但是實現上不太一樣 perl中定義的命令列引數不包含perl命令和perl命令後面的perl程式檔名，即 不包含 perl 程式檔名 也就是說，陣列 argv中存放的...
Perl命令列開關
0 規定記錄分隔符 a 與 n 或者 p 一起使用，負責開啟自動拆分模式，用於對空白字元進行隱式拆分，並將字段放入陣列 f 中，例如 date perl ane print f 0 n c 只檢查 perl 指令碼語法，而不執行指令碼 d 對指令碼開啟 perl 偵錯程式 d 設定 perl 的除錯...
Rails 命令列常用總結
1.rails g scaffold user name string phone string 建立乙個使用者mvc框架的腳手架 2.rails g migration rename end time to over time 修改資料庫的欄位名 遷移rb檔案 encoding utf 8 cla...