Bug#722644: syntax checker should check for balanced parentheses first

[jidanni at jidanni.org]

Package: perl
Version: 5.18.1-4
Severity: wishlist

The syntax checker should check for balanced parentheses first.

$ perl -c p
"my" variable $p masks earlier declaration in same scope at p line 30.
$ perltidy p
## Please see file p.ERR
$ cat p.ERR

28: for my $g(keys $p) {
                       ^
29: for my $m ( 0.. $#{$$p{$g}{members}{data}} } ) {
              ^
29: for my $m ( 0.. $#{$$p{$g}{members}{data}} } ) {
                                               ^
Found 1 extra '(' between '{' on line 28 and '}' on line 29
    The most recent un-matched '(' is on line 29

There is no previous '{' to match a '}' on line 41
41: }
    ^
41:	Starting negative indentation
87:	final indentation level: -1
87:	To see 1 non-critical warnings rerun with -w
87:	To save a full .LOG file rerun with -g

-------------- next part --------------
A non-text attachment was scrubbed...
Name: p
Type: application/octet-stream
Size: 2012 bytes
Desc: perl program
URL: <http://lists.alioth.debian.org/pipermail/perl-maintainers/attachments/20130913/9d8bfbab/attachment.obj>