use strict;
use warnings;
{
    our $foo = "Hello, world!\n";
}
{
    print our $foo; # prints: Hello, world!
}