Un prototipo de la forma &
fuerza una referencia
a código. Si se trata del primer argumento, entonces la palabra sub
es opcional y se puede omitir en la llamada
permitiendo un estilo similar al uso de los operadores sort
,
eval
o grep
:
$ cat -n ampproto.pl 1 #!/usr/bin/perl -w 2 use strict; 3 4 sub t (&$) { my ($f, $x) = @_; print &$f($x),"\n" } 5 6 t { $_[0]**3 } 4; 7 $ ./ampproto.pl 64Observe la ausencia de coma en la llamada de la lınea 6. Esta caracterıstica nos permite escribir funciones que siguen una sintáxis similar a la de
sort
.
Casiano Rodríguez León