my $x;

sub foo {
   ...[ use $x ]...
}

##</code><code>##

our $x = undef;

sub foo {
   ...[ use $x ]...
}