HTMLpointHTMLpoint HTMLpoint.com


 F.A.Q. su PERL


23. ¿Cómo se usan los parámetros de línea de instrucción?


Antes que nada, hay que recordar que éstos se incluyen en el array @ARGV, que carece de un método de uso "estándar" (recordad que el lema del Perl es "There's more than one way to do it!"); el más usado, de todos modos, parece ser algo del tipo:

while(@ARGV && $ARGV[0] =~ m/^-/) {
$_=shift(@ARGV);
if (m/^-h$/ || m/^--help$/) {
&help;
} elsif (m/^-v$/ || m/^--version$/) {
&version;
} else {
&error;
}
}

que se puede traducir muy brutalmente como: "si el primer parámetro pasado al script empieza con un "-", quítalo del array @ARGV y, si es "-h" o "--help" lanza la subroutine "help", si es "-v" o "--version" lanza la subroutine "version", si por el contrario no es ninguna de éstas, lanza la subroutine "error" (que advertirá que el switch seleccionado no tiene efecto)".
Podréis añadir todos los switch que queráis, teniendo cuidado de gestionar bien las subroutines afectadas.

[ Índice ]     [ Siguiente ]
  Vuelve a principio de página