allow negative decimals (and -0)

diff --git a/pcb/pcb-panelise b/pcb/pcb-panelise
index 69f251d6a651556075e3c4213a5b523d20c49d23..91b3498572d83d050b3c158a32d9cdb13fd8b2a1 100755 (executable)
--- a/pcb/pcb-panelise
+++ b/pcb/pcb-panelise
@@ -81,7 +81,7 @@ sub process () {
 #print STDERR "$argstring>".join("|",@a)."<\n";
                map {
                    die "$_ ?" unless
-                       m/^(?: (?: 0 | \-? [1-9]\d* ) (?: \. \d* )?
+                       m/^(?: \-? (?: 0 | [1-9]\d* ) (?: \. \d* )?
                            | 0x[0-9a-f]{8} | 0x[0-9a-f]{16} |
                            \" (?: \w | [-():,.] | \001 | \$ )* \" |
                            \'.\' )$/x;