Revision 19384d73
Von Moritz Bunkus vor fast 14 Jahren hinzugefügt
t/structure/common_errors.t | ||
---|---|---|
|
||
my @common_errors = ([ '^\s*my\s+%[a-z0-9_]+\s*=\s*shift' ],
|
||
[ '^\s*my\s+\(.*\)\s*=\s*shift' ],
|
||
[ '^\s*my\s+\$.*\s*=\s*@_' ],
|
||
[ '^\s*my\s+\$[^=]*=\s*@_' ],
|
||
[ '@[a-z0-9_]+->' ],
|
||
[ 'uft8' ],
|
||
[ '\$slef' ],
|
Auch abrufbar als: Unified diff
False positive in Test "my $foo = @bar" vermeiden