El Prototipo &

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
64

Observe 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.