Package: perl
Version: 5.14.2-20
Severity: wishlist
$ perl -c e.pl
"my" variable $NPx masks earlier declaration in same statement at e.pl line 11.
$ cat e.pl
use strict;
use warnings FATAL => 'all';
my $t="y";
my $df="z";
die unless open( my $NP, ">$t" );
die unless print $NP 33;
die unless close $NP;
my $o=qx{env - LC_CTYPE=zh_TW.UTF-8 w3m -dump $t 2>&1}
#MISSING ";" above causes spurious '"my" variable masks earlier declaration in
same statement"
die unless open( my $NPx, ">$df" );
die unless print $NPx $o;
die unless close $NPx;
--
To UNSUBSCRIBE, email to debian-bugs-dist-requ...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org
