Utiliser un fichier de configuration en Perl

Vous voulez développer une application qui nécessite des options de configuration importantes, une solution assez simple serait que le fichier de configuration soit lui même écrit en Perl.

Utiliser la fonction eval sur le contenu du fichier :

my $conf = "$etc/mon_fichier_de_conf";
my $conf_content = "";
open(IN,"<$conf_content") or die $!;
while(my $line = <IN>)
{
        $conf_content = $conf_content.$line;
}
close(IN);

eval($conf_content);

Une autre solution plus simple, mais moins portable :

eval(`cat configuration_file`) or die $!;

Dans un environnement strict, il ne faut pas oublier de déclarer les variables, soit dans le fichier de configuration, soit dans le script avant.

Plus d'information dans la documentation de Perl :

• perldoc -f eval