download.pl: cope with potential two-digit linux versions

SVN-Revision: 27376

diff --git a/scripts/download.pl b/scripts/download.pl
index 50ecfc696659ea63b1974259e03dddfa6b5411d1..08949d698aa49dd375e4dfbc14fb831e27dde61e 100755 (executable)
--- a/scripts/download.pl
+++ b/scripts/download.pl
@@ -136,9 +136,9 @@ foreach my $mirror (@ARGV) {
                push @mirrors, "ftp://ftp.digex.net/pub/gnu/$1";
        } elsif ($mirror =~ /^\@KERNEL\/(.+)$/) {
                my @extra = ( $1 );
-               if ($filename =~ /linux-\d+\.\d+\.\d+-rc/) {
+               if ($filename =~ /linux-\d+\.\d+(?:\.\d+)?-rc/) {
                        push @extra, "$extra[0]/testing";
-               } elsif ($filename =~ /linux-(\d+\.\d+\.\d+)/) {
+               } elsif ($filename =~ /linux-(\d+\.\d+(?:\.\d+)?)/) {
                        push @extra, "$extra[0]/longterm/v$1";
                }               
                foreach my $dir (@extra) {