¿Cómo puedo crear una secuencia de comandos Perl para obtener algunos argumentos de línea de comando "con nombre"?

Question

¿Cómo puedo crear una secuencia de comandos de Perl para obtener algunos argumentos de línea de comando "con nombre"?

Por ejemplo:

perl my_perl.pl -ARG_1 1234 -ARG_2 "Testing" 

Dónde Arg_1 y ARG_2 son los nombres de argumentos y 1234 y "control" de sus valores.

Answer 1

Puede obtener un efecto similar al usar Getopt::Long. La principal diferencia es que usa gnu-style --argumentos por defecto. Es muy flexible y poderoso.

Answer 2

Ver Getopt::Long. Si no te gusta eso, hay muchos others.

En el caso más simple, se puede hacer:

my %args = @ARGV; 
print $args{-ARG_1}, "\n";