Indicadores de Perl -pe, -pi, -p, -w, -d, -i, -t?

He visto muchas formas de ejecutar código o scripts Perl, con diferentes banderas. Sin embargo, cuando trato de buscar en Google lo que significa cada bandera, obtengo resultados principalmente en sitios de Perl genéricos y no se encuentra información específica sobre las banderas o su uso.

A continuación se muestran las banderas que encuentro con más frecuencia, y no tengo ni idea de lo que significan:

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

Estaré muy agradecido si me dice qué significa cada uno de ellos y algunos casos de uso para ellos, o al menos me dice una forma de averiguar su significado.

Sí, Google es notoriamente difícil para levantar la puntuacion y, por desgracia, Perl no parecen ser en su mayoría compuesta de puntuacion :-)

Los interruptores de la línea de comando se detallan en perlrun . (disponible desde la línea de comando llamando perldoc perlrun)

Entrando en las opciones brevemente, una por una:

-p: coloca un bucle de impresión alrededor de su comando para que actúe en cada
    línea de entrada estándar. Se usa principalmente para que Perl pueda vencer
    pantalones off awk en términos de potencia Y simplicidad :-)
-n: coloca un bucle sin impresión alrededor de su comando.
-e: le permite proporcionar el programa como un argumento en lugar de
    que en un archivo. No quieres tener que crear un script
    archivo para cada pequeño texto de una sola línea de Perl.
-i: modifica su archivo de entrada en el lugar (haciendo una copia de seguridad del
    original). Útil para modificar archivos sin la {copia,
    borrar-original, renombrar} proceso.
-w: Activa algunas advertencias. Cualquier buen codificador de Perl usará esto.
-d: se ejecuta en el depurador de Perl. Para depurar su código Perl,
    obviamente.
-t: trata cierto código "contaminado" (dudoso) como advertencias (adecuado
    el modo de contaminación producirá un error en este código dudoso). Acostumbrado a la carne
    mejorar la seguridad de Perl, especialmente cuando se ejecuta código para otros
    usuarios, como scripts de setuid o material web.

La -pbandera básicamente ejecuta el script con

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

-e le permite pasar un script a STDIN

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

-iindica al intérprete que todos los datos transmitidos STDINpor el script en ejecución deben realizarse en el lugar.

-wes lo mismo que use warnings;, pero en un ámbito global en lugar de local

-d ejecuta el depurador de Perl

Otros han mencionado perlrun. Si usa B :: Deparse, puede ver lo que significa (para la mayoría de las cosas):

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

1 está representado por '???', porque está optimizado.

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

-i establece $ ^ I, como

$ 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

Pero recuerde, <ARGV> usa 2 argumentos abiertos, así que no tenga nombres de archivo que comiencen con > <o comiencen / terminen con |.

También hay una bandera importante -nque no se menciona en la lista.

-nfunciona igual que -p, solo que no imprime $_por defecto. Esto puede resultar muy útil para filtrar archivos de texto.

De esta manera, Perl puede reemplazar grep | seden una sola línea.

Por ejemplo:

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

Imprimirá cada valor entero encontrado después de "Mensajes leídos:", y nada más.