¿De cuántas maneras puede llamar a una subrutina e ignorar su prototipo en Perl?

Question

Todos deberíamos estar familiarizados con los problemas relacionados con prototypes en Perl. Aquí están los dos biggies:

• no funcionan como prototipos en otros idiomas, por lo que la gente no los entiende.
• no se aplican a todas las formas de llamar a una subrutina.

El segundo artículo es el que tengo curiosidad por el momento.

Conozco dos maneras de subvertir/evitar/ignore la aplicación de prototipo cuando se llama a una subrutina:

• ir al sub como método. Foo->subroutine_name();
• Llame al submarino con un sigil principal &. &subroutine_name();

¿Hay algún otro caso interesante que me haya perdido?

udpate:

@ Brian d Foy, yo no quiero particularmente para evadir prototipos, pero se preguntó "cuántas maneras hay para hacerlo?" Hago esta pregunta por curiosidad.

@jrockway, estoy de acuerdo contigo, y creo que tienes más explícita y más concisamente descrito mi primer punto con respecto a los problemas con los prototipos, que la gente los malinterpreta. Quizás el problema radique en las expectativas del programador y no en la característica. Pero esa es realmente una pregunta filosófica del tipo que no quiero tener.

Answer 1

Llámalo a través de una referencia de subrutina.

sub foo($) { print "arg is $_[0]\n" } 
my $sub = \&foo; 
$sub->(); 

---

Llame antes de Perl ha visto el prototipo (importante porque Perl no hace que se declara submarinos antes de su uso):

foo(); 
sub foo($) { print "arg is $_[0]\n" } 

Answer 2

Utilizando la sintaxis goto &name.

Answer 3

Tipo-glob.

sub foo($) { print "arg is $_[0]\n" } 
*foo{CODE}() 

Además, considere Bar-> foo() reescrito en notación indirecta:

foo Bar 

más? Vamos, tráelo.