Perlフラグ-pe、-pi、-p、-w、-d、-i、-t？

さまざまなフラグを使用して、Perlコードまたはスクリプトを実行する多くの方法を見てきました。ただし、各フラグの意味をグーグルで調べようとすると、主に一般的なPerlサイトに結果が返され、フラグやその使用に関する特定の情報はそこで見つかりません。

以下は、私が最も頻繁に遭遇するフラグですが、それらの意味がわかりません。

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

それぞれの意味と使用例を教えていただければ幸いです。少なくとも、その意味を知る方法を教えてください。

はい、Googleは句読点を検索するのが難しいことで有名であり、残念ながら、Perl はほとんど句読点で構成されているようです:-)

コマンドラインスイッチの詳細は、perlrunに記載されています。（コマンドラインからを呼び出すことで利用可能perldoc perlrun）

オプションを1つずつ簡単に説明します。

-p：コマンドの周囲に印刷ループを配置して、コマンドがそれぞれに作用するようにします
    標準入力の行。Perlが打つことができるように主に使用されます
    パワーとシンプルさの点でawkから脱いでください:-)
-n：コマンドの周りに非印刷ループを配置します。
-e：プログラムを引数として提供することができます
    ファイルよりも。スクリプトを作成する必要はありません
    すべての小さなPerlワンライナー用のファイル。
-i：入力ファイルをインプレースで変更します（
    元の）。{copy、
    delete-original、rename}プロセス。
-w：一部の警告をアクティブにします。優れたPerlコーダーはこれを使用します。
-d：Perlデバッガーの下で実行します。Perlコードをデバッグするには、
    明らかに。
-t：特定の「汚染された」（疑わしい）コードを警告（適切な
    taintモードはこの怪しいコードでエラーになります）。牛肉に使用
    特に他のコードを実行する場合は、Perlのセキュリティを強化する
    setuidスクリプトやWebスタッフなどのユーザー。

-pフラグは、基本的にスクリプトを実行します

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

-e スクリプトを渡すことができます STDIN

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

-iSTDIN実行中のスクリプトによって渡されたすべてのデータがインプレースで実行されるようにインタープリターに指示します。

-wと同じですが、use warnings;ローカルスコープではなくグローバルスコープです

-d Perlデバッガを実行します

他の人は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は$ ^ 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引数のオープンを使用するため、で始まるファイル名> <や、で始まる/終了するファイル名は使用しないでください|。

-nリストに記載されていない重要なフラグも1つあります。

-nと同じよう-pに機能しますが$_、デフォルトでは印刷されません。これは、テキストファイルのフィルタリングに非常に役立ちます。

このようにして、Perlはgrep | sed単一のワンライナーで置き換えることができます。

例えば：

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

「メッセージの読み取り：」の後に見つかったすべての整数値を出力します。