Handle Perl modules with letters in names

diff --git a/cpan/download.cgi b/cpan/download.cgi
index e62da10..3ff58fb 100755 (executable)
--- a/cpan/download.cgi
+++ b/cpan/download.cgi
@@ -189,7 +189,7 @@ if ($file{'Build.PL'} && $file{'Makefile.PL'} < @dirs) {
                }
        }
 foreach $d (@dirs) {
-       if ($d =~ /^(\S+)\-v?([0-9\.]+)$/) {
+       if ($d =~ /^(\S+)\-v?([0-9\.ab]+)$/) {
                push(@mods, $1);
                push(@vers, $2);
                }