One in and one out.

Changes

@@ -1,6 +1,9 @@
 Changelog for Acme-CPANAuthors-POE
 ==================================
 
+0.10  Thu Apr 29 23:19:31 BST 2010
+  - One in and one out.
+
 0.08  Tue Mar 16 21:17:39 GMT 2010
   - Added Mark Morgan
 

README

@@ -82,6 +82,7 @@ CONTAINED AUTHORS
       MISCHKE => q[Mark McConnell],
       MIYAGAWA => q[Tatsuhiko Miyagawa],
       MMIMS => q[Marc Mims],
+      MMORGAN => q[Mark Morgan],
       MOCK => q[MOCK],
       MOCONNOR => q[Matthew O'Connor],
       MRPERSON => q[Curtis Hawthorne],

lib/Acme/CPANAuthors/POE.pm

@@ -4,7 +4,7 @@ use strict;
 use warnings;
 use vars qw($VERSION);
 
-$VERSION = '0.08';
+$VERSION = '0.10';
 
 use Acme::CPANAuthors::Register (
   AAR => q[Alessandro Ranellucci],
@@ -16,7 +16,6 @@ use Acme::CPANAuthors::Register (
   AIMASS => q[Alejandro Imass],
   ANDYPUR => q[Andrew V. Purshottam],
   APOCAL => q[Apocalypse],
-  AVAR => q[AEvar Arnfjord Bjarmason],
   BINGOS => q[Chris Williams],
   BSMITH => q[Benjamin Smith],
   BTROTT => q[Benjamin Trott],
@@ -87,6 +86,7 @@ use Acme::CPANAuthors::Register (
   RJP => q[Rob Partington],
   RKITOVER => q[Rafael Kitover],
   SABECK => q[Scott Beck],
+  SAPER => q[Sebastien Aperghis-Tramoni],
   SEGAN => q[Sean Egan],
   SHARIFULN => q[Anatoly Sharifulin],
   SMCNABB => q[Steve McNabb],
@@ -147,7 +147,6 @@ It is currently statically generated information, I hope to make it dynamic in t
   AIMASS => q[Alejandro Imass],
   ANDYPUR => q[Andrew V. Purshottam],
   APOCAL => q[Apocalypse],
-  AVAR => q[AEvar Arnfjord Bjarmason],
   BINGOS => q[Chris Williams],
   BSMITH => q[Benjamin Smith],
   BTROTT => q[Benjamin Trott],
@@ -218,6 +217,7 @@ It is currently statically generated information, I hope to make it dynamic in t
   RJP => q[Rob Partington],
   RKITOVER => q[Rafael Kitover],
   SABECK => q[Scott Beck],
+  SAPER => q[Sebastien Aperghis-Tramoni],
   SEGAN => q[Sean Egan],
   SHARIFULN => q[Anatoly Sharifulin],
   SMCNABB => q[Steve McNabb],

tools/poe_authors.pl

@@ -8,16 +8,16 @@
 use Getopt::Long;
 
 my $version;
+my $mirror = 'http://cpan.hexten.net/';
 
-GetOptions('version=s' => \$version);
+GetOptions('version=s', \$version, 'mirror=s', \$mirror);
 
 die "No version specified with --version\n" unless $version and $version =~ /^[0-9\.]+$/;
 
 my $mailrc = '01mailrc.txt.gz';
 my $packages = '02packages.details.txt.gz';
 
 my $location = '.';
-my $mirror = 'http://cpan.hexten.net/';
 
 my @files = ('authors/01mailrc.txt.gz','modules/02packages.details.txt.gz');