# config.txt




name = foo


name2 = foo2


...
##</code><code>##



# config.pl


open(FILEHANDLE, "config.txt");



$values = {};




while ($line = <FILEHANDLE>) {

  $line =~ /^([^=]+)=(.*)/;

  $values{$1} = $2;

}