X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FImport-Into.git;a=blobdiff_plain;f=maint%2Fbump-version;h=8a345cce4bbede59a15842f218056bf7f3f2072d;hp=8cbc11d6e9af1e90122a13353aac6879e617e275;hb=d3faa8a5e5f4460fee2cdba2b2f7911dc52b7e42;hpb=e6231601f2013254f597e15fb555f87aa93f2ad4 diff --git a/maint/bump-version b/maint/bump-version index 8cbc11d..8a345cc 100755 --- a/maint/bump-version +++ b/maint/bump-version @@ -7,7 +7,7 @@ use autodie; chomp(my $LATEST = qx(grep '^[0-9]' Changes | head -1 | awk '{print \$1}')); -my @parts = split /\./, $LATEST; +my @parts = map { m/(\d{1,3})/g } split /\./, $LATEST; push @parts, 0, 0; my $OLD_DECIMAL = sprintf('%i.%03i%03i', @parts);