私はPerlコードに次のようなデータ構造を持っているコンフィグ::一般

Question

で配列参照を含む複雑なPerlのデータ構造を表現：

my $config = { 
    'View::Mason' => { 
     comp_root  => [ 
      [ 'teamsite' => 'root/teamsite' ], 
      [ 'components' => 'root/components' ], 
     ], 
    }, 
}; 

私はConfig::General設定ファイルにこの構造を表現しようとしています。

は、これまでのところ私が持っている：

少なくとも「comp_root」要素配列リファレンスになりますが、私はそれが別の配列参照を指すように取得することはできません

<View::Mason> 
    <comp_root> 
     teamsite  root/teamsite 
    </comp_root> 
    <comp_root> 
     components  root/components 
    </comp_root> 
</View::Mason> 

。

これはConfig :: Generalで実行できますか？

Answer 1

私はConfig :: Generalで可能ではないと思います。たとえば：

use Config::General qw(SaveConfigString); 

my $config = { 
    'View::Mason' => { 
     comp_root  => [ 
      [ 'teamsite' => 'root/teamsite' ], 
      [ 'components' => 'root/components' ], 
     ], 
    }, 
}; 

print SaveConfigString($config); 

はそれを保存することができない場合は、オッズはそれをロードすることはできませんです

<View::Mason> 
    comp_root ARRAY(0x94ea168) 
    comp_root ARRAY(0x94fbc98) 
</View::Mason> 

生成します。ここで

は、私がどうなるのかです：私は私の設定ファイルは次のようになりたいもの

1. 図アウト。
2. このような設定ファイルをロードできるモジュールを探します。 （ロードするのが難しいと判明した場合は、フォーマットを変更する可能性があります）
3. ステップ2の結果が他のプログラムで直接使用できない場合は、設定リーダーが与えるものを変換するコードを書きます私のプログラムが望んでいるものに私を入れてください。
は

Answer 2

YAMLはあなたのためのオプションであるかもしれない：

use strict; 
use warnings; 
use Data::Dumper qw(Dumper); 
use YAML::XS qw(Load); 

my $config_text = ' 
View::Mason: 
    comp_root: 
    - 
     - teamsite 
     - root/teamsite 
    - 
     - components 
     - root/components 
'; 

my $config = Load($yaml_text); 
print Dumper($config);