ディレクトリツリーを使った設定ファイル管理・その 2 #

File::Slurp::Tree の slurp_tree は、File::Find::Rule を利用して取得するファイルの絞り込みも可能

 my $rule = File::Find::Rule->name('license.txt');
 my $tree = slurp_tree('/path/to/config', (rule => $rule));
 print Dumper $tree;

実行結果

 $VAR1 = {
           'path' => {
                       'to' => {
                                 'config' => {
                                               'app00' => {
                                                            'license.txt' => '500'
                                                          },
                                               'app01' => {
                                                            'license.txt' => '0'
                                                          }
                                             }
                               }
                     }
         };

ディレクトリツリーを使った設定ファイル管理・その 2 #

See Also