use strict; use warnings; use TieENV; $, = "\n"; print $ENV{foo}, $ENV{PATH};