ACCORDING TO RCS...

$ p_rlog `p_list -a` | perl -e 'while(<>){/author:\s(\w+);/&&++$w{$1};}foreach(sort{$w{$b}<=>$w{$a}}keys%w){print"$w{$_}\t$_\n";}'
1457    relph           John Relph
667     wessmith        Wesley Smith
596     rcu             Rebecca Underwood
400     rogerc          Roger Chickering
316     rusty           Rusty Ballinger
300     orosz           Jim Orosz
271     ctb             Chris Beekhuis
264     lcwp            Laura Wirth Peters
252     leung           Jenny Leung
231     kirthiga        Kirthiga Reddy
107     sandeepj        Sandeep Jain
82      kyleh           Kyle "Doc" Holliday
1       jtk             Ted Kline
1       sarahp          Sarah Pham