Usando el siguiente código:
use v6d;
# sub circumfix:<α ω>( @a ) {
# @a[0] >= @a[1] & @a[0] <= @a[2];
# };
sub circumfix:<α ω>( $a, $b, $c ) {
$a >= $b & $a <= $c;
};
if (α <5 0 10> ω) {
say 'Truthy';
}
else {
say 'Falsey';
}
Resultados en:
(base) hsmyers@BigIron:~/board$ perl6 ./op.p6
Too few positionals passed; expected 3 arguments but got 1
in sub circumfix:<α ω> at ./op.p6 line 7
in block <unit> at ./op.p6 line 11
Mientras que cambiar el bloque comentado por la otra definición resulta en:
(base) hsmyers@BigIron:~/board$ perl6 ./op.p6
Truthy
La versión rota (con tres parámetros) es la que quiero, ¿alguien podría explicar por qué está rota?
(*@foo where .elems == 3)
que luego podría apoyar ya seaα $a, $b, $c ω
oα ($a, $b, $c) ω