match - perl6 マッチングでジャンクションを使用することは可能ですか?

Question

junction を使用して、junction 内のいずれかの値と一致させることはできますか? 配列内の任意の値と一致させたい。それを行う適切な方法は何ですか？

lisprog$ perl6
To exit type 'exit' or '^D'
> my @a=<a b c>
[a b c]
> any(@a)
any(a, b, c)
> my $x=any(@a)
any(a, b, c)
> my $y = "a 1"
a 1
> say $y ~~ m/ $x /
False
> say $y ~~ m/ "$x" /
False
> my $x = any(@a).Str
any("a", "b", "c")
> say $y ~~ m/ $x /
False
> say $y ~~ m/ || $x /
False
> say $y ~~ m/ || @a /
｢a｣
> 

ありがとう ！！