Find words which contains more than 3 e vowels: Difference between revisions
Content added Content deleted
m (added related tasks.) |
|||
Line 11: | Line 11: | ||
{{Template:Strings}} |
{{Template:Strings}} |
||
<br><br> |
<br><br> |
||
=={{header|Phix}}== |
|||
<lang Phix>function note(string word) return find_any("aiou",word)=0 and length(find_all('e',word))>3 end function |
|||
sequence notes = filter(split_any(get_text("demo/unixdict.txt")," \r\n"),note) |
|||
printf(1,"%d words: %s\n",{length(notes),join(shorten(notes,"",3))})</lang> |
|||
{{out}} |
|||
<pre> |
|||
16 words: belvedere dereference elsewhere ... seventeenth telemeter tennessee |
|||
</pre> |
|||
=={{header|REXX}}== |
=={{header|REXX}}== |