use strict;

my $foo = 1;

if ($foo) {
   package Strange;
   our $bar = "true";
}
print $Strange::bar || "false";