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