}

И наконец Perl 6 позволяет объявлять анонимные функции с помощью стрелки:

# sub-anonymous.p6

my $anonymous = -> ($value)

{

    say $value * 2;

}

$anonymous(10); # 20

В этом примере переменной $anonymous присвоен указатель на безымянную функцию, после чего происходит вызов посредством этого указателя.

Перегрузка функций

Ключевое слово multi разрешает перегружать функции, то есть создавать несколько функций с одинаковым названием, но разным типом или числом аргументов.

# sub-reload.p6

multi sub action ($scalar)

{

    say "scalar";

}

multi sub action ($scalar, $scalar)

{

    say "two scalars";

}

multi sub action (@array)

{

    say "array";

}

action(10); # scalar

action(10, 11); # two scalars

my @arr = (1, 2);

action(@arr); # array

Перегрузка операторов

Возможность перегружать не только функции, но и операторы явно придется по вкусу любителям C++. Perl 6 позволяет с помощью ключевых слов prefix, infix и postfix определять собственную семантику предопределенных операторов либо создавать новые:

# xfix.p6

multi infix:<+> ($a, $b)

{