Прапори Perl -pe, -pi, -p, -w, -d, -i, -t?

Я бачив безліч способів запуску коду чи скриптів Perl з різними прапорами. Однак, коли я намагаюся шукати в Google за тим, що означає кожен прапор, я в основному отримую результати на загальних сайтах Perl, і конкретної інформації щодо прапорів або їх використання там не знайдено.

Нижче наведені прапори, з якими я найчастіше зустрічаюсь, і я не маю поняття, що вони означають:

• Perl -pe
• perl -pi
• perl -p
• perl -w
• perl -d
• перл -і
• перл -т

Я буду дуже вдячний, якщо ви скажете мені, що означає кожен з них і які випадки використання для них, або, принаймні, розкажете мені спосіб дізнатися їх значення.

Так, Google , як відомо , важко відриваючись розділові знаки і, на жаль, Perl дійсно , здається, в основному з пунктуації :-)

Перемикачі командного рядка детально описані перлрун . (доступно з командного рядка, зателефонувавши perldoc perlrun)

Коротко переглядаючи варіанти, один на один:

-p: Розміщує цикл друку навколо вашої команди, щоб він діяв на кожну
    рядок стандартного вводу. В основному використовується Perl, щоб перемогти
    штани off awk з точки зору потужності І простоти :-)
-n: Розміщує цикл, що не друкується, навколо вашої команди.
-e: Дозволяє надати програму як аргумент
    ніж у файлі. Вам не потрібно створювати сценарій
    файл для кожного маленького однолінійного Perl.
-i: Змінює вхідний файл на місці (робить резервну копію
    оригінал). Зручно змінювати файли без {копії,
    delete-original, перейменувати} процес.
-w: Активує деякі попередження. Будь-який хороший кодер Perl використовуватиме це.
-d: працює під налагоджувачем Perl. Щоб налагодити код Perl,
    очевидно.
-t: певний "заплямований" (сумнівний) код трактує як попередження (власне)
    Режим taint буде помилковим у цьому сумнівному коді). Використовується для яловичини
    підвищити безпеку Perl, особливо при запуску коду для інших
    користувачі, такі як встановлені сценарії чи веб-матеріали.

-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

Інші згадали перлрун. Якщо ви використовуєте 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-аргумент, тому не майте назви файлів, які починаються з > <або починаються / закінчуються |.

Також є один важливий прапор, -nякий не зазначений у списку.

-nпрацює так само -p, як лише друк $_за замовчуванням. Це може бути дуже корисно при фільтрації текстових файлів.

Таким чином Perl може замінюватися grep | sedв одному одноколірному.

Наприклад:

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

Виведе кожне ціле значення, знайдене після "Читання повідомлень:", і більше нічого.