perl -wle'
use foo;
our $var;
print "outer: $var"'