Challenge 64 #2
12345678910111213141516171819202122
sub find(Str $str, @words) {
@words.grep(-> $word {
$str.contains($word)
}) || 0
}
say find
"perlweeklychallenge",
<
weekly
challenge
perl
>
;
say find
"perlandraku",
<
python
ruby
haskell
>
;
Raku
INFO