package vars; use strict; our $foo = "test"; 1;