Perl標誌-pe，-pi，-p，-w，-d，-i，-t？

Question

我見過很多使用不同標誌來運行Perl代碼或腳本的方法。然而，當我嘗試谷歌每個國旗的含義時，我主要得到的結果通用Perl網站，並沒有關於標誌或他們的使用的具體信息在那裏找到。

下面是我遇到的最常見的標誌，和我沒有線索，他們的意思：

• perl的-pe
• perl的-pi
• perl的-p
• perl -w
• perl的-d
• perl的-i
• perl的-t

我會很感激，如果你能告訴我每個那些平均和一些使用情況對他們來說，或至少告訴我一個找出他們意思的方法。

Answer 1

是的，谷歌是用於查找標點符號非常困難的，不幸的是，Perl的確實似乎主要是由標點符號的:-)

命令行開關都在perlrun詳細。 （可以在命令行通過調用perldoc perlrun）

走進選項簡單地說，一個接一個：

 
-p: Places a printing loop around your command so that it acts on each 
    line of standard input. Used mostly so Perl can beat the 
    pants off awk in terms of power AND simplicity :-) 
-n: Places a non-printing loop around your command. 
-e: Allows you to provide the program as an argument rather 
    than in a file. You don't want to have to create a script 
    file for every little Perl one-liner. 
-i: Modifies your input file in-place (making a backup of the 
    original). Handy to modify files without the {copy, 
    delete-original, rename} process. 
-w: Activates some warnings. Any good Perl coder will use this. 
-d: Runs under the Perl debugger. For debugging your Perl code, 
    obviously. 
-t: Treats certain "tainted" (dubious) code as warnings (proper 
    taint mode will error on this dubious code). Used to beef 
    up Perl security, especially when running code for other 
    users, such as setuid scripts or web stuff. 

Answer 2

的-p標誌基本上運行與

while (<>) { 
# exec here 
} 
continue { 
    print or die "-p destination: $!\n"; 
} 

-e允許腳本您將腳本傳遞給STDIN

perl -e '$x = "Hello world!\n"; print $x;' 

-i指示解釋器執行腳本傳遞給STDIN的所有數據將在現場完成。

-w相同use warnings;，但在一個全球性的，而不是本地範圍

-d運行Perl調試

Answer 3

其他提到perlrun。如果您使用的B :: Deparse，你可以看到它意思（對於大多數的東西）：

$ perl -MO=Deparse -p -e 1 
LINE: while (defined($_ = <ARGV>)) { 
    '???'; 
} 
continue { 
    die "-p destination: $!\n" unless print $_; 
} 
-e syntax OK 

1被表示爲「???」，因爲它被優化掉。

$ perl -MO=Deparse -p -i -e 1 
BEGIN { $^I = ""; } 
LINE: while (defined($_ = <ARGV>)) { 
    '???'; 
} 
continue { 
    die "-p destination: $!\n" unless print $_; 
} 
-e syntax OK 

-i設置$ ^我，像

$ perl -MO=Deparse -p -i.bak -e 1 
BEGIN { $^I = ".bak"; } 
LINE: while (defined($_ = <ARGV>)) { 
    '???'; 
} 
continue { 
    die "-p destination: $!\n" unless print $_; 
} 
-e syntax OK 

但要記住，<ARGV>使用2個參數的開放，所以沒有與> <啓動或開始| /結束的文件名。

Answer 4

還有一個重要的標誌-n它沒有在列表中提到。

-n與-p的作用相同，默認情況下只打印$_。這在過濾文本文件中非常有用。

通過這種方式，Perl可以用一行代碼替換grep | sed。

例如：

perl -ne 'print "$1\n" if /Messages read: (\d+)/' <my_input.txt

將打印出來後，發現每一個整數 「消息寫着：」，僅此而已。

Answer 5

一點題外話：很不錯的書有關Perl的俏皮話：http://www.catonmat.net/blog/perl-one-liners-no-starch-press/

對於一般的品味看作者的博客文章。這是一個關於-pie等： http://www.catonmat.net/blog/introduction-to-perl-one-liners/ （和一些有趣的看到http://www.catonmat.net/blog/secret-perl-operators/）