use strict;
our $foo = 123;
our $foo;
our $foo;
our $foo;
our $foo;
print(our $foo, "\n");

##</code><code>##

use strict "refs";
$foo = 123;      # ok
print "$foo\n";  # still ok