Las subrutinas que han sido definidas en una parte anterior del programa pueden ser 
llamadas sin usar paréntesis alrededor de la lista de argumentos:
sub fun1 {
  my $a  = shift;   # shift asume el arreglo @_
  my $y = 2  * $a;
  return ( $y ); 
}
# mas tarde ...
$x = fun1 4;
Casiano Rodríguez León

Principios de Programación Imperativa, Funcional y Orientada a Objetos Una Introducción en Perl/Una Introducción a Perl
por Casiano Rodríguez León 
is licensed under a Creative Commons Reconocimiento 3.0 Unported License.
Permissions beyond the scope of this license may be available at http://campusvirtual.ull.es/ocw/course/view.php?id=43.
2012-06-19