our $x = undef; sub foo { ...[ use $x ]... }