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