Jump to content

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

m
→‎{{header|Perl 6}}: use better variable names to make it easier to follow logic
m (→‎{{header|Perl 6}}: add some timing information)
m (→‎{{header|Perl 6}}: use better variable names to make it easier to follow logic)
Line 49:
prop => 'categoryinfo')\
 
.map({ %( count => .<categoryinfo><pages> || 0,
lang => .<title>.subst(/^'Category:' (.+) ' User'/, ->$/ {$0}) ) })\
 
.sort( { -$_[0].<count>, $_[1].<lang> } )\
 
.map( { last if @_[0].<count> < $minimum; display(|@_.<count>, .<lang>) } );
 
say "========= elapsed: {(now - $start-time).round(.01)} seconds =========";
10,333

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.