viernes, 29 de marzo de 2013

Como procesar argumentos desde la línea de comandos en Perl al estilo Unix Ejemplo 1)


Se puede procesar argumentos recibidos desde la linea de comandos del sistema en un script.
Se propone un sencillo ejemplo que hara lo siguiente:

  • Mostrar el nombre del script.
  • Mostrar la cantidad de argumentos recibidos.
  • Mostrar los valores contenidos dentro del arreglo de argumentos estandar #ARGV.
El ejemplo no realiza un análisis sintáctico de las opciones recibidas.

-------------------------------------------- CORTAR AQUI -------------------------------------------------------
#!/usr/bin/perl
use strict;
use warnings;


#Ejemplo 1): leer valores de la linea de comandos y mostrar el nombre del script

#invocar nombreScript argumento1 argumento2

print "Nombre del script -> $0 \n";
print "Cantidad de argumentos recibidos comienza desde cero hasta $#ARGV \n";
#recorrer argumentos recibidos desde linea de comandos

for (my $i=0;$i <= $#ARGV; $i++){

    print "Argumento -> $i -> $ARGV[$i]\n";

}

-------------------------------------------- CORTAR AQUI -------------------------------------------------------


No hay comentarios:

Publicar un comentario