Local::Ini
my $ini=new Local::Ini(q|test.ini|);
my %defaults=$ini->defaults();

and then need to have 

my $msg=MIME::Lite->new(<br>
       'From'    =>'$defaults{Mail}{From}||"$ENV{USER}"',