}\r
close FH;\r
\r
-$version =~ /InspIRCd-(\d+)\.(\d+)\.(\d+)([ab\+])/;\r
+print "Version: '$version'\n";\r
+\r
+$version =~ /InspIRCd-(\d+)\.(\d+)\.(\d+)([ab\+]|RC|rc)/;\r
\r
$v1 = $1;\r
$v2 = $2;\r
$v3 = $3;\r
$type = $4;\r
\r
-if ($type =~ /^[ab]$/)\r
+print "v1=$1 v2=$2 v3=$3 type=$4\n";\r
+\r
+if ($type =~ /^[ab]|rc|RC$/)\r
{\r
- $version =~ /InspIRCd-\d+\.\d+\.\d+[ab\+](\d+)/;\r
- $alphabeta = $1;\r
+ $version =~ /InspIRCd-\d+\.\d+\.\d+([ab]|RC|rc)(\d+)/;\r
+ $alphabeta = $2;\r
+ print "Version sub is $type $alphabeta\n";\r
$name = "InspIRCd-$v1.$v2.$v3$type$alphabeta.exe";\r
$rel = "$v1.$v2.$v3$type$alphabeta";\r
}\r
\r
print "del $name\n";\r
print "ren Setup.exe $name\n";\r
+\r
system("del $name");\r
system("ren Setup.exe $name");\r
\r