Help for this page
my $x; foreach $x () {}
Loop iterator is not lexical at line 2, column 1. See page 108 of PBP +. Severity: 5