Un prototipo de la forma $
lo que hace es que fuerza un contexto
escalar.
Observe la conducta del siguiente programa:
$ cat -n ./dollarproto.pl 1 #!/usr/bin/perl -w 2 use strict; 3 4 sub t ($@) { my $a = shift; my @b = @_; print "a = $a, b = (@b)\n"; } 5 6 my ($a, $b, $c) = qw/uno dos tres/; 7 t ':',$a, $b, $c; 8 9 my @r = 1..5; 10 t @r; 11 $ ./dollarproto.pl a = :, b = (uno dos tres) a = 5, b = ()¿Podrıa explicar la salida?
Casiano Rodríguez León