perl6 어떤 단어 그룹과도 일치시키는 가장 좋은 방법은 무엇입니까?

나는 어떤 단어 그룹과도 일치하는 간단한 방법을 찾고있다. for 루프를 사용했지만 더 간단한 방법이 있습니까?perl6 어떤 단어 그룹과도 일치시키는 가장 좋은 방법은 무엇입니까?

my @a=<a b c d e f>; 
my $x="a1234567"; 
say $x ~~ m/ @a.any /;

거짓을 반환합니다. 그것을 작동시키는 방법이 있습니까? 감사.

2016-12-31 lisprogtor

my @a = <a b c d e f>; 
my $x = "a1234567"; 
say $x ~~ /@a/;

/@a/ 최장 교대되는 /| @a/ 동일하다. 교대로 /|| @a/을 사용할 수 있습니다.

2016-12-31 12:37:17 CIAvash

그거야! !!! 정말 고마워 !!! 어떤 일을 할 때 즐거움이 있습니다 :-) – lisprogtor

@lisprogtor, 질문의 해결책으로 받아들이려면 답변의 왼쪽에있는 체크 표시를 클릭하십시오 (클릭 한 후 체크 표시가 녹색으로 바뀝니다). 색깔). 체크 표시를 클릭하면 더 이상 도움이 필요 없으며 질문에 답변 한 사람에게 포인트가 표시됩니다. – 7stud

아, 알 겠어! 이 점을 지적 해 주셔서 감사합니다! 내 다른 질문에 답한 사람들의 체크 표시로 돌아가겠습니다. 감사. – lisprogtor

답변