BEGIN {
chdir 't' if -d 't';
- @INC = '../lib';
+ unshift @INC, '../lib';
}
use strict;
{ my $x; $x &= 1; ok 13, uninitialized; }
{ my $x; $x |= 1; ok 14, ! uninitialized; }
-{ my $x; $x ^= 1; ok 15, uninitialized; }
+{ my $x; $x ^= 1; ok 15, ! uninitialized; }
{ my $x; $x &&= 1; ok 16, ! uninitialized; }
{ my $x; $x ||= 1; ok 17, ! uninitialized; }
{ my $x; $x &= "x"; ok 20, uninitialized; }
{ my $x; $x |= "x"; ok 21, ! uninitialized; }
-{ my $x; $x ^= "x"; ok 22, uninitialized; }
+{ my $x; $x ^= "x"; ok 22, ! uninitialized; }
ok 23, $warn eq '';