bintools/evalid/EvalidCompare.pm
changeset 655 3f65fd25dfd4
parent 621 96fee2635b19
child 662 60be34e1b006
child 664 44b0e894b7ab
--- a/bintools/evalid/EvalidCompare.pm	Wed Oct 13 17:57:18 2010 +0800
+++ b/bintools/evalid/EvalidCompare.pm	Mon Oct 18 16:16:46 2010 +0800
@@ -240,7 +240,7 @@
     open (FILE, $file) or die "Error: Couldn't open \"$file\" for reading: $!\n";
     binmode (FILE);
     
-    while ($typeBuf =~ /^.{48}([0-9 ]{9})\x60\x0A(......)/s) {
+    while ($typeBuf =~ /^.{48}([0-9 ]{9}).\x60\x0A(......)/s) {
       # $1 is the size of the archive member, $2 is first 6 bytes of the file
       # There may be several different sorts of file in the archive, and we
       # need to scan through until we find a type we recognize: