Perl、複数のファイルから1つの変数を読む

Question

一連の同一のWebアプリケーション用の複数の設定ファイルから、それぞれ独自のフォルダに設定ディレクティブを取得する必要があります。

私は、各ファイルをステップ実行して開くコードを自分のフォルダに持っています。

$variable="value" 

私は$variableを検索したい、と"value"で返し、その値を持つ私の操作を実行し、ファイルを閉じます：私が欠けていますと、設定で指定された値を返しますステートメントです。

私はそれが私が忘れている簡単なものにならなければならないことを知っています。誰もがいくつかのヒントを持っていますか？

Answer 1

あなたはCPANから既存の設定モジュールのいくつかを使用することができます（たとえばConfigの検索）

設定ファイルのほぼすべての味とニーズのためのモジュールがあります（例）

• Config::General
は、
• Config::Auto
• Config::INIPlus
• Config::YAML

別の設定モジュールをコーディングしてホイールを再構築しないでください。

Answer 2

多分このようなものが欲しいですか？

ls webapps/*/conf/*.conf | xargs perl -nle 'print "$ARGV: $1" if /\$variable\s+=\s+"([^"]+)"/' 

Answer 3

私はConfig::Modelを使用することになり、これは比較的簡単です