Perl如何解析包含变量的INI文件？

Question

INI文件可以在它里面的变量，比如：

[section1] 
root=/path/to/dir 
home=%(root)s/my_home_dir/ 

现在，Perl库Config::IniFiles似乎并不解析它，它并将其作为原始字符串

my $result = tie %info, 'Config::IniFiles', (-file => $ini_file); 

在Python有一个类似的包叫ConfigParser.RawConfigParser - 不会转换变量，但那么你可以使用ConfigParser.ConfigParser，它会。

Perl中是否有类似的东西，或者是我正在寻找的解决方案？

Answer 1

如果你不能找到你所使用的配置文件格式现有的解析器，你可以简单地使用

sub get_conf { 
    my ($hash, $key) = @_; 
    my $val = $hash{key}; 
    return undef if !defined($val); 

    $val =~ s{%\(([^()]*)\)}{ get($hash, $1) // "" }eg; 
    return $val; 
} 

my $home = get_conf(\%conf, 'home');