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
p
Description: perl program
