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+ |
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 " |
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. | |
6. | PHP 163 | |
||
7. | |
7. | Perl 162 | |
||
8. | |
8. | SQL 131 | |
||
9. | |
9. | UNIX Shell 120 | |
||
10. | |
10. | C sharp 113 | |
||
|---------------------| |
|---------------------| |
||
11. | |
11. | Pascal 109 | |
||
12. | |
12. | BASIC 102 | |
||
13. | BASIC 102 | |
|||
+---------------------+</pre> |
+---------------------+</pre> |