(perl) Lexically scoped sanctification of %ENV