Select Code to Download

package Bar;
use warnings;
...
our $x;

1;

use warnings;
use strict;
...
$Bar::x = 1; # warning with plain 'require'

#$Bar::x = $Bar::x = 1; # no warning