Obtain variables from a file.

[misho88]

I have a file with a number of lines in the form:

varname=value

What's the easiest way to make this translate into a variable $varname=value ?

 

[PaulTEG]

open FH, "<file.txt";
my %vars;
while (<FH>) {
  my ($key,$value)=split /=/,$_;
  $vars{$key}=$value;
}
close FH;

Paul
------------------------------------
Spend an hour a week on CPAN, helps cure all known programming ailments ;-)