Flagi Perla -pe, -pi, -p, -w, -d, -i, -t?

Widziałem wiele sposobów uruchamiania kodu lub skryptów Perla z różnymi flagami. Jednak kiedy próbuję wyszukać w Google, co oznacza każda flaga, otrzymuję wyniki głównie do ogólnych witryn Perla i nie znajdują tam żadnych konkretnych informacji dotyczących flag ani ich użycia.

Poniżej flagi, które napotykam najczęściej i nie mam pojęcia, co oznaczają:

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

Będę bardzo wdzięczny, jeśli powiesz mi, co każdy z nich oznacza i jakie są ich przypadki użycia, lub przynajmniej podasz mi, w jaki sposób mogę znaleźć ich znaczenie.

Tak, Google notorycznie ma trudności z wyszukiwaniem interpunkcji i niestety wydaje się , że Perl składa się głównie z interpunkcji :-)

Wszystkie przełączniki wiersza poleceń są szczegółowo opisane w perlrun . (dostępne z linii poleceń, dzwoniąc perldoc perlrun)

Przechodząc do opcji krótko, jeden po drugim:

-p: umieszcza pętlę drukowania wokół twojego polecenia, tak aby działała na każdym z nich
    linia standardowego wejścia. Używany głównie, aby Perl mógł pokonać
    spodnie off awk pod względem mocy i prostoty :-)
-n: umieszcza niedrukowalną pętlę wokół polecenia.
-e: Pozwala raczej na podanie programu jako argumentu
    niż w pliku. Nie chcesz tworzyć skryptu
    plik dla każdego małego jednowierszowego pliku Perl.
-i: modyfikuje plik wejściowy na miejscu (tworząc kopię zapasową
    oryginalny). Przydatne do modyfikowania plików bez {copy,
    delete-original, rename} proces.
-w: aktywuje niektóre ostrzeżenia. Każdy dobry programista w Perlu będzie tego używał.
-d: działa w debugerze Perla. Do debugowania kodu Perla,
    oczywiście.
-t: Traktuje pewien "skażony" (wątpliwy) kod jako ostrzeżenia (właściwe
    tryb skażenia spowoduje błąd w tym wątpliwym kodzie). Używany do wołowiny
    up Bezpieczeństwo Perla, zwłaszcza podczas uruchamiania kodu dla innych
    użytkowników, takich jak skrypty setuid lub rzeczy internetowe.

-pFlag zasadzie uruchamia skrypt

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

-e umożliwia przekazanie skryptu do STDIN

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

-iwskazuje interpreterowi, że wszystkie dane przekazywane STDINprzez skrypt wykonawczy mają być wykonywane w miejscu.

-wjest taki sam jak use warnings;, ale w zasięgu globalnym, a nie lokalnym

-d uruchamia debuger Perla

Inni wspominali o perlrunie. Jeśli używasz B :: Deparse, możesz zobaczyć, co to oznacza (dla większości rzeczy):

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

1 jest reprezentowane przez „???”, ponieważ jest zoptymalizowane.

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

-i ustawia $ ^ I, jak

$ 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

Ale pamiętaj, <ARGV> używa 2-argumentowego otwarcia, więc nie używaj nazw plików, które zaczynają się > <lub zaczynają / kończą się |.

Jest też jedna ważna flaga, -nktórej nie ma na liście.

-ndziała tak samo jak -p, tylko że $_domyślnie nie drukuje . Może to być bardzo przydatne w filtrowaniu plików tekstowych.

W ten sposób Perl może zastąpić grep | sedpojedynczą linijkę.

Na przykład:

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

Wypisze każdą liczbę całkowitą znalezioną po „Przeczytanych wiadomościach:” i nic więcej.