Count occurrences of a substring: Difference between revisions

← Older editNewer edit →
Content deleted Content added
Eoraptor (talk | contribs)
1,336 edits
+Stata
Eoraptor (talk | contribs)
1,336 edits
Line 2,202:
=={{header|Stata}}==
<lang stata>function strcount(s, x) {
n = k = 0
k = 1-(i=strlen(x))
do {
if (k = ustrpos(s, x, k+1i)) n++
} while(k)
return(n)
Line 2,210 ⟶ 2,211:
 
strcount("peter piper picked a peck of pickled peppers", "pe")
5</lang>
 
strcount("ababababab","abab")
2</lang>
 
=={{header|TUSCRIPT}}==
Retrieved from "https://rosettacode.org/wiki/Count_occurrences_of_a_substring"