package Variables;
use strict;
use warnings;

our $foo = 'Foo';
our $bar = 'Bar';

1;


##</code><code>##

use Variables;
use strict;
use warnings;

print $Variables::foo;