Porting/checkAUTHORS.pl

   1 #!/usr/bin/perl -w
   2 use strict;
   3 use Text::Wrap;
   4 $Text::Wrap::columns = 80;
   5 my ($committer, $patch, $log,$date);
   6 use Getopt::Long;
   7
   8 my ($rank, $percentage, $cumulative, $reverse, $ta, @authors, %authors,
   9     %untraced, %patchers, %committers, %real_names);
  10 my $result = GetOptions ("rank" => \$rank,            # rank authors
  11              "thanks-applied" => \$ta,        # ranks committers
  12              "acknowledged=s"   => \@authors ,  # authors files
  13              "percentage" => \$percentage,      # show as %age
  14              "cumulative" => \$cumulative,
  15              "reverse" => \$reverse,
  16             );
  17
  18 if (!$result or (($rank||0) + ($ta||0) + (@authors ? 1 : 0) != 1) or !@ARGV) {
  19   die <<"EOS";
  20 $0 --rank Changelogs                        # rank authors by patches
  21 $0 --acknowledged <authors file> Changelogs # Display unacknowledged authors
  22 $0 --thanks-applied Changelogs            # ranks committers
  23 $0 --percentage ...                         # show rankings as percentages
  24 $0 --cumulative ...                         # show rankings cumulatively
  25 $0 --reverse ...                            # show rankings in reverse
  26 Specify stdin as - if needs be. Remember that option names can be abbreviated.
  27 EOS
  28 }
  29
  30
  31 my $prev = "";
  32 my %map;
  33
  34 while (<DATA>) {
  35     chomp;
  36     s/\\100/\@/g;
  37     $_ = lc;
  38     if (my ($correct, $alias) = /^\s*([^#\s]\S*)\s+(.*\S)/) {
  39         $correct =~ s/^\\043/#/;
  40         if ($correct eq '+') {$correct = $prev} else {$prev = $correct}
  41         $map {$alias} = $correct;
  42     }
  43 }
  44
  45 #
  46 # Email addresses for we do not have names.
  47 #
  48 $map {$_} = "?" for
  49     "agrow\100thegotonerd.com",
  50     "alexander_bluhm\100genua.de",
  51     "alexander_gernler\100genua.de",
  52     "ammon\100rhythm.com",
  53     "andrew\100sundale.net",
  54     "bah\100longitude.com",
  55     "bbucklan\100jpl-devvax.jpl.nasa.gov",
  56     "ben\100linuxgazette.net",
  57     "bilbo\100ua.fm",
  58     "blino\100mandriva.com",
  59     "bob\100starlabs.net",
  60     "bonefish\100cs.tu-berlin.de",
  61     "bstrand\100switchmanagement.com",
  62     "cygwin\100cygwin.com",
  63     "david\100dhaller.de",
  64     "dformosa\100dformosa.zeta.org.au",
  65     "dgay\100acm.org",
  66     "erik\100cs.uni-jena.de",
  67     "glasser\100tang-eleven-seventy-nine.mit.edu",
  68     "gml4410\100ggr.co.uk",
  69     "grommel\100sears.com",
  70     "ilmari\100vesla.ilmari.org",
  71     "ilya\100juil.nonet",
  72     "info\100lingo.kiev.ua",
  73     "jms\100mathras.comcast.net",
  74     "johnh\100isi.edu",
  75     "kan\100dcit.cz",
  76     "kaminsky\100math.huji.ac.il",
  77     "knew-p5p\100pimb.org",
  78     "kvr\100centrum.cz",
  79     "lemkemch\100t-online.de",
  80     "mauzo\100csv.warwick.ac.uk",
  81     "mlelstv\100serpens.de",
  82     "p.boven\100sara.nl",
  83     "padre\100elte.hu",
  84     "pancho\100pancho.name",
  85     "perlbug\100veggiechinese.net",
  86     "pm\100capmon.dk",
  87     "premchai21\100yahoo.com",
  88     "pxm\100nubz.org",
  89     "raf\100tradingpost.com.au",
  90     "scott\100perlcode.org",
  91     "smoketst\100hp46t243.cup.hp.com",
  92     "yath-perlbug\100yath.de",
  93 ;
  94
  95 #
  96 # Email addresses for people that don't have an email address in AUTHORS
  97 # Presumably deliberately?
  98 #
  99
 100 $map {$_} = '!' for
 101      # Nick Ing-Simmons has passed away (2006-09-25).
 102      "nick\100ing-simmons.net",
 103      "nik\100tiuk.ti.com",
 104      "nick.ing-simmons\100elixent.com",
 105      "nick\100ni-s.u-net.com",
 106          "nick.ing-simmons\100tiuk.ti.com",
 107
 108      # Iain Truskett has passed away (2003-12-29).
 109      "perl\100dellah.anu.edu.au",
 110      "spoon\100dellah.org",
 111      "spoon\100cpan.org",
 112
 113      # Ton Hospel
 114      "me-02\100ton.iguana.be",
 115      "perl-5.8.0\100ton.iguana.be",
 116      "perl5-porters\100ton.iguana.be",
 117
 118      # Beau Cox
 119      "beau\100beaucox.com",
 120
 121      # Randy W. Sims
 122      "ml-perl\100thepierianspring.org",
 123
 124      # perl internal addresses
 125      "perl5-porters\100africa.nicoh.com",
 126          "perlbug\100perl.org",,
 127      "perl5-porters.nicoh.com",
 128          "perlbug-followup\100perl.org",
 129          "perlbug-comment\100perl.org",
 130          "bug-module-corelist\100rt.cpan.org",
 131          "bug-storable\100rt.cpan.org",
 132          "bugs-perl5\100bugs6.perl.org",
 133          "unknown",
 134          "unknown\100unknown",
 135          "unknown\100perl.org",
 136         "",
 137         "(none)",
 138 ;
 139
 140
 141 if (@authors) {
 142   my %raw;
 143   foreach my $filename (@authors) {
 144     open FH, "<$filename" or die "Can't open $filename: $!";
 145     while (<FH>) {
 146       next if /^\#/;
 147       next if /^-- /;
 148       if (/<([^>]+)>/) {
 149     # Easy line.
 150     $raw{$1}++;
 151       } elsif (/^([-A-Za-z0-9 .\'À-ÖØöø-ÿ]+)[\t\n]/) {
 152     # Name only
 153     $untraced{$1}++;
 154       } else {
 155     chomp;
 156     warn "Can't parse line '$_'";
 157       }
 158     }
 159   }
 160   foreach (keys %raw) {
 161     print "E-mail $_ occurs $raw{$_} times\n" if $raw{$_} > 1;
 162     $_ = lc $_;
 163     $authors{$map{$_} || $_}++;
 164   }
 165   ++$authors{'!'};
 166   ++$authors{'?'};
 167 }
 168
 169 my @lines = split(/^commit\s*/sm,join('',<>));
 170 for ( @lines) {
 171     next if m/^$/;
 172   next if m/^(\S*?)^Merge:/ism; # skip merge commits
 173   if (m/^(.*?)^Author:\s*(.*?)^Date:\s*(.*?)^(.*)$/gism) {
 174     # new patch
 175     ($patch, $committer, $date,$log) = ($1,$2,$3,$4);
 176     chomp($committer);
 177     unless ($committer) { die $_}
 178     &process ($committer, $patch, $log);
 179 } else { die "XXX $_ did not match";}
 180 }
 181
 182
 183 if ($rank) {
 184   &display_ordered(\%patchers);
 185 } elsif ($ta) {
 186   &display_ordered(\%committers);
 187 } elsif (%authors) {
 188   my %missing;
 189   foreach (sort keys %patchers) {
 190     next if $authors{$_};
 191     # Sort by number of patches, then name.
 192     $missing{$patchers{$_}}->{$_}++;
 193   }
 194   foreach my $patches (sort {$b <=> $a} keys %missing) {
 195     print "\n\n=head1 $patches patch(es)\n\n";
 196     foreach my $author (sort keys %{$missing{$patches}}) {
 197         my $xauthor = $author;
 198         $xauthor =~ s/@/\\100/g; # xxx temp hack
 199           print "".($real_names{$author}||$author) ."\t\t\t<" . $xauthor.">\n" ;
 200     }
 201   }
 202 }
 203
 204 sub display_ordered {
 205   my $what = shift;
 206   my @sorted;
 207   my $total;
 208   while (my ($name, $count) = each %$what) {
 209     push @{$sorted[$count]}, $name;
 210     $total += $count;
 211   }
 212
 213   my $i = @sorted;
 214   return unless @sorted;
 215   my $sum = 0;
 216   foreach my $i ($reverse ? 0 .. $#sorted : reverse 0 .. $#sorted) {
 217     next unless $sorted[$i];
 218     my $prefix;
 219     $sum += $i * @{$sorted[$i]};
 220     # Value to display is either this one, or the cumulative sum.
 221     my $value = $cumulative ? $sum : $i;
 222     if ($percentage) {
 223     $prefix = sprintf "%6.2f:\t", 100 * $value / $total;
 224     } else {
 225     $prefix = "$value:\t";
 226     }
 227     print wrap ($prefix, "\t", join (" ", sort @{$sorted[$i]}), "\n");
 228   }
 229 }
 230
 231 sub process {
 232   my ($committer, $patch, $log) = @_;
 233   return unless $committer;
 234   my @authors = $log =~ /From:\s+.*?([^"\@ \t\n<>]+\@[^"\@ \t\n<>]+)/gm;
 235
 236   if (@authors) {
 237     foreach my $addr (@authors) {
 238
 239       $patchers{_raw_address($addr)}++;
 240     }
 241     # print "$patch: @authors\n";
 242     $committers{_raw_address($committer)}++;
 243   } else {
 244       # print "$patch: $committer\n";
 245     # Not entirely fair as this means that the maint pumpking scores for
 246     # everything intergrated that wasn't a third party patch in blead
 247     $patchers{_raw_address($committer)}++;
 248   }
 249 }
 250
 251 sub _raw_address {
 252     my $addr = shift;
 253     my $real_name;
 254     if ($addr =~ /<.*>/) {
 255     $addr =~ s/^\s*(.*)\s*<\s*(.*?)\s*>.*$/$2/ ;
 256      $real_name = $1;
 257     }
 258     $addr = lc $addr;
 259     $addr = $map{$addr} || $addr;
 260
 261     if ($real_name) { $real_names{$addr} = $real_name};
 262     return $addr;
 263 }
 264
 265
 266 __DATA__
 267
 268 #
 269 # List of mappings. First entry the "correct" email address, as appears
 270 # in the AUTHORS file. Second is any "alias" mapped to it.
 271 #
 272 # If the "correct" email address is a '+', the entry above is reused;
 273 # this for addresses with more than one alias.
 274 #
 275 # Note that all entries are in lowercase. Further, no '@' signs should
 276 # appear; use \100 instead.
 277 #
 278 #
 279 #  Committers.
 280 #
 281 adi                                     enache\100rdslink.ro
 282 alanbur                                 alan.burlison\100sun.com
 283 +                                       alan.burlison\100uk.sun.com
 284 +                                       aburlison\100cix.compulink.co.uk
 285 ams                                     ams\100toroid.org
 286 +                                       ams\100wiw.org
 287 chip                                    chip\100pobox.com
 288 +                                       chip\100perl.com
 289 +                                       salzench\100nielsenmedia.com
 290 +                                       chip\100atlantic.net
 291 +                                       chip\100rio.atlantic.net
 292 +                                       salzench\100dun.nielsen.com
 293 craigb                                  craig.berry\100psinetcs.com
 294 +                                       craig.berry\100metamorgs.com
 295 +                                       craig.berry\100signaltreesolutions.com
 296 +                                       craigberry\100mac.com
 297 +                                       craig.a.berry\100gmail.com
 298 +                                                                               craig a. berry)
 299 davem                                   davem\100fdgroup.com
 300 +                                       davem\100iabyn.nospamdeletethisbit.com
 301 +                                       davem\100iabyn.com
 302 +                                       davem\100fdgroup.co.uk
 303 +                                       davem\100fdisolutions.com
 304 +                                       davem\100iabyn.com
 305 demerphq                                demerphq\100gmail.com
 306 +                                       yves.orton\100de.mci.com
 307 +                                       yves.orton\100mciworldcom.de
 308 +                                       demerphq\100dromedary.booking.com
 309 +                                       demerphq\100gemini.(none)
 310 +                                       demerphq\100camel.booking.com
 311 +                                       demerphq\100hotmail.com
 312 doughera                                doughera\100lafayette.edu
 313 +                                       doughera\100lafcol.lafayette.edu
 314 +                                       doughera\100fractal.phys.lafayette.edu
 315 +                                       doughera.lafayette.edu
 316 +                                       doughera\100newton.phys.lafayette.edu
 317
 318 gbarr                                   gbarr\100pobox.com
 319 +                                       bodg\100tiuk.ti.com
 320 +                                       gbarr\100ti.com
 321 +                                       graham.barr\100tiuk.ti.com
 322 gisle                                   gisle\100activestate.com
 323 +                                       gisle\100aas.no
 324 +                                       aas\100aas.no
 325 +                                       aas\100bergen.sn.no
 326 gsar                                    gsar\100activestate.com
 327 +                                       gsar\100cpan.org
 328 +                                       gsar\100engin.umich.edu
 329 hv                                      hv\100crypt.compulink.co.uk
 330 +                                       hv\100crypt.org
 331 +                                       hv\100iii.co.uk
 332 jhi                                     jhi\100iki.fi
 333 +                                       jhietaniemi\100gmail.com
 334 +                                       jhi\100kosh.hut.fi
 335 +                                       jhi\100alpha.hut.fi
 336 +                                       jhi\100cc.hut.fi
 337 +                                       jhi\100hut.fi
 338 +                                       jarkko.hietaniemi\100nokia.com
 339 +                                       jarkko.hietaniemi\100cc.hut.fi
 340 jesse                                   jesse\100bestpractical.com
 341 +                                       jesse\100fsck.com
 342 +                                       jesse\100perl.org
 343 merijn                                  h.m.brand\100xs4all.nl
 344 +                                       h.m.brand\100hccnet.nl
 345 +                                       merijn\100l1.procura.nl
 346 +                                                                               merijn\100a5.(none)
 347 +                                                                               merijnb\100ms.com
 348 +                                                                               merijnb\100iloquent.nl
 349 +                                                                               merijnb\100iloquent.com
 350 mhx                                     mhx-perl\100gmx.net
 351 +                                                                               mhx\100r2d2.(none)
 352 nicholas                                nick\100unfortu.net
 353 +                                       nick\100ccl4.org
 354 +                                       nick\100talking.bollo.cx
 355 +                                       nick\100plum.flirble.org
 356 +                                       nick\100babyhippo.co.uk
 357 +                                       nick\100bagpuss.unfortu.net
 358 +                                                                               Nicholas Clark (sans From field in mail header)
 359 pudge                                   pudge\100pobox.com
 360 rgs                                     rgarciasuarez\100free.fr
 361 +                                       rgarciasuarez\100mandrakesoft.com
 362 +                                       rgarciasuarez\100mandriva.com
 363 +                                       rgarciasuarez\100gmail.com
 364 +                                       raphel.garcia-suarez\100hexaflux.com
 365 sky                                     sky\100nanisky.com
 366 +                                       artur\100contiller.se
 367 +                                       arthur\100contiller.se
 368 steveh                                  stevehay\100planit.com
 369 +                                       steve.hay\100uk.radan.com
 370 stevep                                  steve\100fisharerojo.org
 371 +                                       steve.peters\100gmail.com
 372 timb                                    Tim.Bunce\100pobox.com
 373 +                                       tim.bunce\100ig.co.uk
 374
 375
 376 #
 377 # Mere mortals.
 378 #
 379 \043####\100juerd.nl                    juerd\100cpan.org
 380 +                                       juerd\100convolution.nl
 381 7k8lrvf02\100sneakemail.com             kjx9zthh3001\100sneakemail.com
 382 +                                       dtr8sin02\100sneakemail.com
 383 +                                       rt8363b02\100sneakemail.com
 384 +                                       o6hhmk002\100sneakemail.com
 385 +                                       smueller\100cpan.org
 386 +                                       l2ot9pa02\100sneakemail.com
 387 +                                       wyp3rlx02\100sneakemail.com
 388 +                                       0mgwtfbbq\100sneakemail.com
 389
 390 a.r.ferreira\100gmail.com               aferreira\100shopzilla.com
 391 abe\100ztreet.demon.nl                  abeltje\100cpan.org
 392 abela\100hsc.fr                         abela\100geneanet.org
 393 abigail\100abigail.be                   abigail\100foad.org
 394 +                                       abigail\100abigail.nl
 395 +                                       abigail\100fnx.com
 396 aburt\100isis.cs.du.edu                                 isis!aburt
 397 ach\100mpe.mpg.de                       ach\100rosat.mpe-garching.mpg.de
 398 adavies\100ptc.com                                              alex.davies\100talktalk.net
 399 ajohnson\100nvidia.com                  ajohnson\100wischip.com
 400 alexm\100netli.com                      alexm\100w-m.ru
 401 alex-p5p\100earth.li                    alex\100rcon.rog
 402 alexmv\100mit.edu                       alex\100chmrr.net
 403 alian\100cpan.org                       alian\100alianwebserver.com
 404 allen\100grumman.com                    allen\100gateway.grumman.com
 405 allen\100huarp.harvard.edu              nort\100bottesini.harvard.edu
 406 +                                                                               nort\100qnx.com
 407 allens\100cpan.org                      easmith\100beatrice.rutgers.edu
 408 andreas.koenig\100anima.de              andreas.koenig.gmwojprw\100franz.ak.mind.de
 409 +                                       andreas.koenig.7os6vvqr\100franz.ak.mind.de
 410 +                                       a.koenig\100mind.de
 411 +                                       k\100anna.in-berlin.de
 412 +                                       andk\100cpan.org
 413 +                                       koenig\100anna.mind.de
 414 +                                       k\100anna.mind.de
 415 +                                                                               root\100ak-71.mind.de
 416 +                                                                               root\100ak-75.mind.de
 417 +                                                                               k\100sissy.in-berlin.de
 418 +                                                                               a.koenig\100kulturbox.de
 419 +                                                                               k\100sissy.in-berlin.de
 420 anno4000\100lublin.zrz.tu-berlin.de     anno4000\100mailbox.tu-berlin.de
 421 +                                       siegel\100zrz.tu-berlin.de
 422 ash\100cpan.org                         ash_cpan\100firemirror.com
 423 avarab\100gmail.com                     avar\100cpan.org
 424
 425 bailey\100newman.upenn.edu              bailey\100hmivax.humgen.upenn.edu
 426 +                                       bailey\100genetics.upenn.edu
 427 +                                                                               bailey.charles\100gmail.com
 428 bah\100ecnvantage.com                   bholzman\100longitude.com
 429 bcarter\100gumdrop.flyinganvil.org      q.eibcartereio.=~m-b.{6}-cgimosx\100gumdrop.flyinganvil.org
 430 ben_tilly\100operamail.com              btilly\100gmail.com
 431 +                                                                               ben_tilly\100hotmail.com
 432 ben\100morrow.me.uk                                             mauzo\100csv.warwick.ac.uk
 433 BQW10602\100nifty.com                                   sadahiro\100cpan.org
 434
 435 chromatic\100wgz.org                    chromatic\100rmci.net
 436 clintp\100geeksalad.org                                 cpierce1\100ford.com
 437 clkao\100clkao.org                      clkao\100bestpractical.com
 438 corion\100corion.net                    corion\100cpan.org
 439 cp\100onsitetech.com                    publiustemp-p5p\100yahoo.com
 440 +                                       publiustemp-p5p3\100yahoo.com
 441 cpan\100audreyt.org                     autrijus\100egb.elixus.org
 442 +                                       autrijus\100geb.elixus.org
 443 +                                       autrijus\100gmail.com
 444 +                                       autrijus\100ossf.iis.sinica.edu.tw
 445 +                                       autrijus\100autrijus.org
 446 +                                       audreyt\100audreyt.org
 447 crt\100kiski.net                                                perl\100ctweten.amsite.com
 448
 449 damian\100conway.org                                    damian\100cs.monash.edu.au
 450 dagolden\100cpan.org                    xdaveg\100gmail.com
 451 dan\100sidhe.org                        sugalsd\100lbcc.cc.or.us
 452 +                                       sugalskd\100osshe.edu
 453 david.dyck\100fluke.com                 dcd\100tc.fluke.com
 454 david\100kineticode.com                                 david\100wheeler.com
 455 +                                                                               david\100wheeler.net
 456 djberg86\100attbi.com                                   djberg96\100attbi.com
 457 domo\100computer.org                    shouldbedomo\100mac.com
 458 +                                       domo\100slipper.ip.lu
 459 +                                                                               domo\100tcp.ip.lu
 460 dougm\100covalent.net                   dougm\100opengroup.org
 461 +                                       dougm\100osf.org
 462 dougw\100cpan.org                                               doug_wilson\100intuit.com
 463
 464 egf7\100columbia.edu                    efifer\100sanwaint.com
 465 eggert\100twinsun.com                                   eggert\100sea.sm.unisys.com
 466 epeschko\100den-mdev1                   esp5\100pge.com
 467
 468 fugazi\100zyx.net                       larrysh\100cpan.org
 469 +                                                                               lshatzer\100islanddata.com
 470
 471 gbacon\100itsc.uah.edu                                          gbacon\100adtrn-srv4.adtran.com
 472 gfuji\100cpan.org                                               g.psy.va\100gmail.com
 473 gibreel\100pobox.com                    stephen.zander\100interlock.mckesson.com
 474 +                                       srz\100loopback
 475 gnat\100frii.com                        gnat\100prometheus.frii.com
 476 gp\100familiehaase.de                   gerrit\100familiehaase.de
 477 grazz\100pobox.com                      grazz\100nyc.rr.com
 478 gward\100ase.com                                                greg\100bic.mni.mcgill.ca
 479 hansmu\100xs4all.nl                     hansm\100icgroup.nl
 480 +                                       hansm\100icgned.nl
 481 +                                       hans\100icgned.nl
 482 +                                       hansm\100euronet.nl
 483 hio\100ymir.co.jp                       hio\100hio.jp
 484 hops\100sco.com                                                 hops\100scoot.pdev.sco.com
 485
 486 james\100mastros.biz                                            theorb\100desert-island.me.uk
 487 jand\100activestate.com                                 jan.dubois\100ibm.net
 488 japhy\100pobox.com                      japhy\100pobox.org
 489 +                                       japhy\100perlmonk.org
 490 +                                       japhy\100cpan.org
 491 +                                                                               jeffp\100crusoe.net
 492 jari.aalto\100poboxes.com               jari.aalto\100cante.net
 493 jcromie\100divsol.com                   jcromie\100cpan.org
 494 +                                       jim.cromie\100gmail.com
 495 jidanni\100jidanni.org                                  jidanni\100hoffa.dreamhost.com
 496 jdhedden\100cpan.org                    jerry\100hedden.us
 497 +                                       jdhedden\1001979.usna.com
 498 +                                       jdhedden\100gmail.com
 499 +                                       jdhedden\100yahoo.com
 500 +                                                                               jhedden\100pn100-02-2-356p.corp.bloomberg.com
 501 jeremy\100zawodny.com                                   jzawodn\100wcnet.org
 502 jesse\100sig.bsh.com                                    jesse\100ginger
 503 jfriedl\100yahoo.com                    jfriedl\100yahoo-inc.com
 504 jhannah\100omnihotels.com                                       jay\100jays.net
 505 jjore\100cpan.org                       twists\100gmail.com
 506 jns\100integration-house.com            jns\100gellyfish.com
 507 +                                       gellyfish\100gellyfish.com
 508 john\100atlantech.com                                   john\100titanic.atlantech.com
 509 john\100johnwright.org                                  john.wright\100hp.com
 510 joseph\100cscaper.com                                   joseph\1005sigma.com
 511 joshua\100rodd.us                                                       jrodd\100pbs.org
 512 jtobey\100john-edwin-tobey.org                          jtobey\100user1.channel1.com
 513 jpeacock\100rowman.com                  john.peacock\100havurah-software.org
 514 +                                       jpeacock\100havurah-software.org
 515 +                                                                               jpeacock\100dsl092-147-156.wdc1.dsl.speakeasy.net
 516 jql\100accessone.com                                    jql\100jql.accessone.com
 517 jsm28\100hermes.cam.ac.uk                                       jsm28\100cam.ac.uk
 518
 519 kane\100dwim.org                        kane\100xs4all.net
 520 +                                       kane\100cpan.org
 521 +                                       kane\100xs4all.nl
 522 +                                       jos\100dwim.org
 523 +                                       jib\100ripe.net
 524 ken\100mathforum.org                    kenahoo\100gmail.com
 525 kroepke\100dolphin-services.de          kay\100dolphin-services.de
 526 kstar\100wolfetech.com                  kstar\100cpan.org
 527 +                                       kurt_starsinic\100ml.com
 528 +                                                                               kstar\100www.chapin.edu
 529 +                                                                               kstar\100chapin.edu
 530 larry\100wall.org                       lwall\100jpl-devvax.jpl.nasa.gov
 531 +                                       lwall\100netlabs.com
 532 +                                       larry\100netlabs.com
 533 +                                       lwall\100sems.com
 534 +                                       lwall\100scalpel.netlabs.com
 535 laszlo.molnar\100eth.ericsson.se                        molnarl\100cdata.tvnet.hu
 536 lewart\100uiuc.edu                      lewart\100vadds.cvm.uiuc.edu
 537 +                                       d-lewart\100uiuc.edu
 538 lstein\100cshl.org                                              lstein\100formaggio.cshl.org
 539 +                                                                               lstein\100genome.wi.mit.edu
 540 lupe\100lupe-christoph.de                                       lupe\100alanya.m.isar.de
 541 lutherh\100stratcom.com                                 lutherh\100infinet.com
 542 mab\100wdl.loral.com                                            markb\100rdcf.sm.unisys.com
 543 marcel\100codewerk.com                  gr\100univie.ac.at
 544 mark.p.lutz\100boeing.com                                       tecmpl1\100triton.ca.boeing.com
 545 mats\100sm6sxl.net                      mats\100sm5sxl.net
 546 mauzo\100csv.warwick.ac.uk                              mauzo\100.(none)
 547 mbarbon\100dsi.unive.it                 mattia.barbon\100libero.it
 548 mcmahon\100ibiblio.org                  mcmahon\100metalab.unc.edu
 549 merlyn\100stonehenge.com                                merlyn\100gadget.cscaper.com
 550 mgjv\100comdyn.com.au                   mgjv\100tradingpost.com.au
 551 mlh\100swl.msd.ray.com                                          webtools\100uewrhp03.msd.ray.com
 552 michael.schroeder\100informatik.uni-erlangen.de mls\100suse.de
 553 mike\100stok.co.uk                      mike\100exegenix.com
 554 mjtg\100cam.ac.uk                       mjtg\100cus.cam.ac.uk
 555 mikedlr\100tardis.ed.ac.uk                              mikedlr\100it.com.pl
 556 moritz\100casella.verplant.org          moritz\100faui2k3.org
 557 +                                                                               moritz lenz
 558
 559
 560 neeracher\100mac.com                                    neeri\100iis.ee.ethz.ch
 561 neil\100bowers.com                                              neilb\100cre.canon.co.uk
 562 nospam-abuse\100bloodgate.com           tels\100bloodgate.com
 563 +                                       perl_dummy\100bloodgate.com
 564
 565 ian.phillipps\100iname.com                              ian_phillipps\100yahoo.co.uk
 566 ignasi.roca\100fujitsu-siemens.com      ignasi.roca\100fujitsu.siemens.es
 567 ilya\100math.berkeley.edu               ilya\100math.ohio-state.edu
 568 +                                       nospam-abuse\100ilyaz.org
 569
 570 okamoto\100corp.hp.com                  okamoto\100hpcc123.corp.hp.com
 571 orwant\100oreilly.com                                   orwant\100media.mit.edu
 572
 573 p5-authors\100crystalflame.net          perl\100crystalflame.net
 574 +                                       rs\100crystalflame.net
 575 +                                       coral\100eekeek.org
 576 +                                       coral\100moonlight.crystalflame.net
 577 +                                       rs\100oregonnet.com
 578 paul.green\100stratus.com               paul_greenvos\100vos.stratus.com
 579 +                                                                               pgreen\100seussnt.stratus.com
 580 paul.marquess\100btinternet.com         paul_marquess\100yahoo.co.uk
 581 +                                       paul.marquess\100ntlworld.com
 582 +                                       paul.marquess\100openwave.com
 583 +                                       pmarquess\100bfsec.bt.co.uk
 584 +                                       pmqs\100cpan.org
 585 pcg\100goof.com                         schmorp\100schmorp.de
 586 perl\100cadop.com                       cdp\100hpescdp.fc.hp.com
 587 perl\100greerga.m-l.org                                 greerga\100m-l.org
 588 perl\100profvince.com                   vince\100profvince.com
 589 perl-rt\100wizbit.be                    p5p\100perl.wizbit.be
 590 # Maybe we should special case this to get real names out?
 591 Peter.Dintelmann\100Dresdner-Bank.com   peter.dintelmann\100dresdner-bank.com
 592 # NOTE: There is an intentional trailing space in the line above
 593 pfeifer\100wait.de                      pfeifer\100charly.informatik.uni-dortmund.de
 594 +                                                                               upf\100de.uu.net
 595 phil\100perkpartners.com                phil\100finchcomputer.com
 596 pimlott\100idiomtech.com                andrew\100pimlott.net
 597 +                                                                               pimlott\100abel.math.harvard.edu
 598 pne\100cpan.org                         philip.newton\100gmx.net
 599 +                                       philip.newton\100datenrevision.de
 600 +                                       pnewton\100gmx.de
 601 pprymmer\100factset.com                 pvhp\100forte.com
 602 public\100khwilliamson.com              khw\100karl.(none)
 603
 604 radu\100netsoft.ro                      rgreab\100fx.ro
 605 raphael.manfredi\100pobox.com           raphael_manfredi\100grenoble.hp.com
 606 renee.baecker\100smart-websolutions.de          reneeb\100reneeb-desktop.(none)
 607 richard.foley\100ubsw.com               richard.foley\100t-online.de
 608 +                                       richard.foley\100ubs.com
 609 +                                       richard.foley\100rfi.net
 610 rick\100consumercontact.com             rick\100bort.ca
 611 +                                       rick.delaney\100rogers.com
 612 +                                       rick\100bort.ca
 613 +                                                                               rick.delaney\100home.com
 614 rjbs\100cpan.org                        rjbs-perl-p5p\100lists.manxome.org
 615 +                    perl.p5p\100rjbs.manxome.org
 616 rjk\100linguist.dartmouth.edu           rjk\100linguist.thayer.dartmouth.edu
 617 +                                       rjk-perl-p5p\100tamias.net
 618 rjray\100redhat.com                        rjray\100uswest.com
 619 rmgiroux\100acm.org                     rmgiroux\100hotmail.com
 620 +                                                                               mgiroux\100bear.com
 621 rmbarker\100cpan.org                    rmb1\100cise.npl.co.uk
 622 +                                       robin.barker\100npl.co.uk
 623 +                                       rmb\100cise.npl.co.uk
 624 robertmay\100cpan.org                   rob\100themayfamily.me.uk
 625 roberto\100keltia.freenix.fr                    roberto\100eurocontrol.fr
 626 robin\100cpan.org                       robin\100kitsite.com
 627 roderick\100argon.org                   roderick\100gate.net
 628 +                                                                               roderick\100ibcinc.com
 629 rootbeer\100teleport.com                rootbeer\100redcat.com
 630 +                                                                               tomphoenix\100unknown
 631 schubiger\100cpan.org                   steven\100accognoscere.org
 632 +                                       sts\100accognoscere.org
 633 +                                       schubiger\100gmail.com
 634 schwern\100pobox.com                    schwern\100gmail.com
 635 +                                       schwern\100athens.arena-i.com
 636 +                                       schwern\100blackrider.aocn.com
 637 +                                       schwern\100ool-18b93024.dyn.optonline.net
 638 schotth\100sgi.com                                              author scotth\100sgi.com 842220273 +0000
 639 schwab\100suse.de                                               schwab\100issan.informatik.uni-dortmund.de
 640 +                                                                               schwab\100ls5.informatik.uni-dortmund.de
 641 sebastien\100aperghis.net               maddingue\100free.fr
 642 +                                       saper\100cpan.org
 643 shlomif\100vipe.technion.ac.il          shlomif\100iglu.org.il
 644 simon\100simon-cozens.org               simon\100pembro4.pmb.ox.ac.uk
 645 +                                       simon\100brecon.co.uk
 646 +                                       simon\100othersideofthe.earth.li
 647 +                                       simon\100cozens.net
 648 +                                       simon\100netthink.co.uk
 649 slaven\100rezic.de                      slaven.rezic\100berlin.de
 650 +                                       srezic\100iconmobile.com
 651 +                                       srezic\100cpan.org
 652 +                                                                               eserte\100cs.tu-berlin.de
 653 smcc\100mit.edu                         smcc\100ocf.berkeley.edu
 654 +                                       smcc\100csua.berkeley.edu
 655 +                                       alias\100mcs.com
 656 +                                       smccam\100uclink4.berkeley.edu
 657 spider\100orb.nashua.nh.us              spider\100web.zk3.dec.com
 658 +                                       spider\100leggy.zk3.dec.com
 659 +                                       spider-perl\100orb.nashua.nh.us
 660 +                                       spider\100peano.zk3.dec.com
 661 +                                       spider.boardman\100orb.nashua.nh.us>
 662 +                                       spidb\100cpan.org
 663 +                                                                               spider.boardman\100orb.nashua.nh.us
 664 spp\100ds.net                           spp\100psa.pencom.com
 665 +                                       spp\100psasolar.colltech.com
 666 +                                       spp\100spotter.yi.org
 667 stef\100mongueurs.net                   stef\100payrard.net
 668 +                                       s.payrard\100wanadoo.fr
 669 +                                                                               properler\100freesurf.fr
 670 +                                                                               stef\100francenet.fr
 671 sthoenna\100efn.org                                             ysth\100raven.shiftboard.com
 672
 673 tassilo.parseval\100post.rwth-aachen.de tassilo.von.parseval\100rwth-aachen.de
 674 tchrist\100perl.com                      tchrist\100mox.perl.com
 675 +                                        tchrist\100jhereg.perl.com
 676 thomas.dorner\100start.de                tdorner\100amadeus.net
 677 tjenness\100cpan.org                     t.jenness\100jach.hawaii.edu
 678 +                                        timj\100jach.hawaii.edu
 679 tom.horsley\100mail.ccur.com             tom.horsley\100ccur.com
 680 +                                        tom\100amber.ssd.hcsc.com
 681
 682 vkonovalov\100lucent.com                  vkonovalov\100peterstar.ru
 683 +                                         konovalo\100mail.wplus.net
 684 +                                         vadim\100vkonovalov.ru
 685 +                                         vkonovalov\100spb.lucent.com
 686 +                                         vkonovalov\100alcatel-lucent.com
 687
 688 whatever\100davidnicol.com                davidnicol\100gmail.com
 689 wolfgang.laun\100alcatel.at               wolfgang.laun\100chello.at
 690 +                                         wolfgang.laun\100thalesgroup.com
 691 +                                         wolfgang.laun\100gmail.com