Skip to main content
Share Your Experience: Take the 2024 Developer Survey
mpapec's user avatar
mpapec's user avatar
mpapec's user avatar
mpapec
  • Member for 11 years
  • Last seen this week
Stats
321
reputation
259k
reached
2
answers
2
questions
Loading…
About

Users with best score/answer ratio

perl -MpQuery -MData::Dumper -e '*Q = *pQuery;
print Dumper map [
    sort { $b->{ratio} <=> $a->{ratio} }
    map {
        @h{qw(s a u)} = map Q($_)->text,
          @{ Q($_)->find("td") };
        s/k// and $_ *= 1000 for @h{qw(s a)};
        $h{ratio} = $h{s}/$h{a};
        +{%h};
    } @{ Q($_)->find("tr") }
], @{ Q(pop)->find(".fl") }[0,1];
' http://stackoverflow.com/tags/perl/topusers
1
gold badge
3
silver badges
9
bronze badges
6
Score
2
Posts
50
Posts %
6
Score
2
Posts
50
Posts %
6
Score
2
Posts
50
Posts %
5
Score
1
Posts
25
Posts %
5
Score
1
Posts
25
Posts %
5
Score
1
Posts
25
Posts %
Top posts