Rosetta Code/Rank languages by number of users: Difference between revisions

Content added Content deleted
m (correct output)
Line 31: Line 31:
gen j = ustrpos(v1,char(34),i+1)
gen j = ustrpos(v1,char(34),i+1)
gen k = ustrpos(v1,char(34),j+1)
gen k = ustrpos(v1,char(34),j+1)
gen s = usubstr(v1,j+1,k-j-1)
gen s = usubstr(v1,j+7,k-j-7)
replace i = ustrpos(v1,"title=")
replace i = ustrpos(v1,"title=")
replace j = ustrpos(v1,">",i+1)
replace j = ustrpos(v1,">",i+1)
Line 42: Line 42:
local s
local s
preserve
preserve
copy "http://rosettacode.org`=s[`i']'" `i'.html, replace
copy `"https://rosettacode.org/mw/index.php?title=`=s[`i']'&redirect=no"' `i'.html, replace
import delimited `i'.html, delim("@") enc("utf-8") clear
import delimited `i'.html, delim("@") enc("utf-8") clear
count if ustrpos(v1,"/wiki/User")
count if ustrpos(v1,"/wiki/User")
Line 67: Line 67:
5. | JavaScript 186 |
5. | JavaScript 186 |
|---------------------|
|---------------------|
6. | Javascript 186 |
6. | PHP 163 |
7. | PHP 163 |
7. | Perl 162 |
8. | Perl 162 |
8. | SQL 131 |
9. | SQL 131 |
9. | UNIX Shell 120 |
10. | UNIX Shell 120 |
10. | C sharp 113 |
|---------------------|
|---------------------|
11. | C sharp 113 |
11. | Pascal 109 |
12. | Pascal 109 |
12. | BASIC 102 |
13. | BASIC 102 |
+---------------------+</pre>
+---------------------+</pre>