Variables especiales de Perl

En Perl hay un conjunto de variables globales, accesibles al programas en ejecución, que debemos conocer para aprovechar mejor las capacidades del lenguaje. El listado completo podéis verlo en la guía de referencia de Perl o tecleanado en el terminal $ perldoc perlvar, pero con que conozcáis éstas podréis ir programando:

@ARGV # guarda los argumentos con que se ejecuta un programa perl

Si invocamos en el terminal $ perl programa.pl -f archivo.txt, mientras dure la ejecución del programa @ARGV contendrá:

 
$ARGV[0] contiene '-f'
$ARGV[1] contiene 'archivo.txt'

 
@_      # hace el papel de @ARGV al invocar una subrutina, funcion o procedimiento

$_      # al leer un archivo desde un programa Perl, cada linea se guarda en $_

Si dentro de un programa invocamos a la función print("Hola\n"), la función recogerá el parámetro "Hola\n" como el primer elemento de @_, es decir, $_[0].

Bruno Contreras-Moreira
http://www.eead.csic.es/compbio