hi,
Codereferenzen werden über den
->
Operator ausgeführt, Argumente in()
.
Werden die Funktionen f3 und f5 als Typeglob (*
Operator) referenziert, kann beim Aufruf der ->
Operator auch entfallen:
use strict;
use warnings;
local $, = " ";
sub f1{
my $x = shift;
return sub{
my $y = shift;
$x * $y;
}
}
# Erzeuge Typeglobs
*f3 = f1(3);
*f5 = f1(5);
print f3(11), f5(7);
Perl5