Textonyms: Difference between revisions

← Older editNewer edit →
Content deleted Content added
imported>Meerkut
AWK (gawk) solution added
imported>Meerkut
m →‎AWK: Redundant variable assignment removed
Line 312:
=={{header|AWK}}==
{{works with|gawk|5.1.0 }}
<syntaxhighlight lang="AWKawk">
#!/usr/bin/env -S gawk -E
 
Line 373:
for (jj=1; jj<=nn; jj++) {
lchr=qqq[jj]
if (pos1=index(AZ," "lchr" ")>0) { nmb = nmb XEK[lchr] }
else {
EE++
Retrieved from "https://rosettacode.org/wiki/Textonyms"