... BEGIN{ our $VAR = 'fred'; } use pg; ...