our $foo = 1;
BEGIN {...}