sync-with-cpan: allow digits after -TRIAL
authorRicardo Signes <rjbs@cpan.org>
Thu, 20 Mar 2014 14:00:56 +0000 (10:00 -0400)
committerRicardo Signes <rjbs@cpan.org>
Thu, 20 Mar 2014 14:00:56 +0000 (10:00 -0400)
Porting/sync-with-cpan

index d436703..fdbc6ad 100755 (executable)
@@ -218,7 +218,7 @@ chdir "cpan";
 my  $pkg_dir      = $files[0];
     $pkg_dir      =~ s!.*/!!;
 
-my ($old_version) = $distribution =~ /-([0-9.]+(?:-TRIAL)?)\.tar\.gz/;
+my ($old_version) = $distribution =~ /-([0-9.]+(?:-TRIAL[0-9]*)?)\.tar\.gz/;
 
 my  $o_module     = $module;
 if ($cpan_mod =~ /-/ && $cpan_mod !~ /::/) {
@@ -267,7 +267,7 @@ unless ($tarball) {
 }
 else {
     $new_file     = $tarball;
-    $new_version  = $version // ($new_file =~ /-([0-9._]+(?:-TRIAL)?)\.tar\.gz/) [0];
+    $new_version  = $version // ($new_file =~ /-([0-9._]+(?:-TRIAL[0-9]*)?)\.tar\.gz/) [0];
 }
 
 my  $old_dir      = "$pkg_dir-$old_version";