Los argumentos pasados a una subrutina están disponibles
dentro del bloque via el array
especial @_
.
El primer argumento es $_[0]
, el segundo $_[1]
, etc.
$_[0]
es un alias de la variable pasada como primer argumento y su modificación conlleva
la modificación de la variable:
~/perltesting/lhp$ cat -n args.pl 1 use Modern::Perl; 2 use Test::More 'no_plan'; 3 sub one { $_[0] = 4; } 4 5 my $a = 2; 6 one($a); 7 say $a; 8 is $a, 4, '$a es 4';
Casiano Rodríguez León