Perl,从多个文件中读取单个变量

时间:2012-02-04 23:28:21

标签: perl file search variables config

我必须从多个配置文件中获取一系列相同的Web应用程序的配置指令,每个应用程序都在自己的文件夹中。

我有代码单步执行并打开每个文件,在它自己的文件夹中。我缺少的是一个声明,它将返回config中指定的值:

$variable="value"

我想搜索$variable,然后使用"value"返回,使用该值执行操作,然后关闭文件。

我知道这是我忘记的简单事情。有人有提示吗?

3 个答案:

答案 0 :(得分:2)

您可以使用CPAN中的几个现有配置模块(例如,搜索Config

几乎所有风格和需要的配置文件都有模块:(示例)

不要通过编码其他配置模块来重新发明轮子。

答案 1 :(得分:1)

我会使用Config::Model,来自cli和gui编辑

答案 2 :(得分:0)

也许你想要这样的东西?

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