use Perl6::Junctions qw(any); print "OK\n" if ($test == any(7,5,3));