use Data::Dumper;

my $conf = (
foo => 'foofoo',
bar => 'barbar',
);

open CONF,"myconfig.conf";
print CONF Dumper($conf);
close CONF;

##</code><code>##

my $VAR1; #you must declare VAR1 from file if you use strict
open CONF,"myconfig.conf";
my $conf = eval (join "",<CONF>);

close CONF;