summaryrefslogtreecommitdiff
path: root/Porting/sync-with-cpan
diff options
context:
space:
mode:
authorRicardo Signes <rjbs@cpan.org>2014-03-20 10:00:56 -0400
committerRicardo Signes <rjbs@cpan.org>2014-03-20 10:00:56 -0400
commit87a7cbadd8678833337412bca174d352a90db6d4 (patch)
treef938ac18e19abdb93725192c28bd481f07505a0a /Porting/sync-with-cpan
parent6901b8d95792a0dcf07d5f09cc9eafb4b9fc6c66 (diff)
downloadperl-87a7cbadd8678833337412bca174d352a90db6d4.tar.gz
sync-with-cpan: allow digits after -TRIAL
Diffstat (limited to 'Porting/sync-with-cpan')
-rwxr-xr-xPorting/sync-with-cpan4
1 files changed, 2 insertions, 2 deletions
diff --git a/Porting/sync-with-cpan b/Porting/sync-with-cpan
index d436703cab..fdbc6ad525 100755
--- a/Porting/sync-with-cpan
+++ b/Porting/sync-with-cpan
@@ -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";