$map{"autrijus\100egb.elixus.org"} = $map{"autrijus\100geb.elixus.org"}
= $map{"autrijus\100gmail.com"} = $map{"autrijus\100ossf.iis.sinica.edu.tw"}
- = "autrijus\100autrijus.org";
+ = $map{"autrijus\100autrijus.org"} = "cpan\100audreyt.org";
$map{"ilya\100math.ohio-state.edu"} = $map{"ilya\100math.berkeley.edu"}
= $map{"ilya\100math.berkeley.edu"} = "nospam-abuse\100ilyaz.org";
$map{"philip.newton\100gmx.net"} = $map{"philip.newton\100datenrevision.de"}
$map{"rgarciasuarez\100mandrakesoft.com"}
= $map{"rgarciasuarez\100mandriva.com"}
+ = $map{"rgarciasuarez\100gmail.com"}
= $map{"raphel.garcia-suarez\100hexaflux.com"} = "rgs";
$map{"jhietaniemi\100gmail.com"} = $map{"jhi\100kosh.hut.fi"}
= $map{"jhi\100cc.hut.fi"} = $map{"jarkko.hietaniemi\100nokia.com"} = "jhi";
$map{"nik\100tiuk.ti.com"} = $map{"nick.ing-simmons\100elixent.com"} = "nick";
$map{"hv\100crypt.org"} = "hv";
$map{"gisle\100aas.no"} = "gisle";
+$map{"gsar\100cpan.org"} = "gsar";
if (@authors) {
my %raw;