Perl, 여러 파일에서 단일 변수 읽기

Question

일련의 동일한 웹 응용 프로그램에 대한 여러 구성 파일에서 구성 지시문을 가져와야합니다. 각 지시문은 각각의 고유 한 폴더에 있습니다.

각 파일을 단계별로 실행하고 코드를 열어 본인의 폴더에 있습니다.

$variable="value" 

내가 $variable 검색 할 및 "value"로 돌아가, 그 값을 내 작업을 수행하고 파일을 닫습니다 : 제가 부족하고하면 설정에 지정된 값을 반환하는 문입니다.

내가 잊어 버린 단순한 것이 있어야한다는 것을 알고 있습니다. 누구나 힌트가 있으십니까?

Answer 1

당신은 거의 모든 맛과 설정 파일의 요구에 모듈이 있습니다

(예를 들어 Config을 검색) CPAN에서 기존 설정 모듈의 여러 사용할 수 있습니다 (예)

• 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을 사용은 CLI 및 GUI 편집자