diff --git a/windows/unpack.pl b/windows/unpack.pl
index 14afe6f188..ebecdeac7f 100755
--- a/windows/unpack.pl
+++ b/windows/unpack.pl
@@ -12,7 +12,7 @@
 sub num {
     my ($t)=@_;
     if($t =~ /.*(\d)\.(\d+)\.(\d+)_(\d+)/) {
-        return 1000000*$1 + 10000*$2 + 100+$3 + $4;
+        return 1000000*$1 + 10000*$2 + 100*$3 + $4;
     }
     return 0;
 }