設定ファイルを読み込む

Perl

なぜだかPerlのお勉強をしている。設定ファイル(config.ini)を読み込む場合はConfig::Simpleを使ったとすると、次のようなる。
config.ini

[Set1]
param1=1
param2=2
[Set2]
param1=3

という設定ファイルがあったとして、
test.cgi

#!/usr/bin/perl
use Config::Simple;

my $cfg = new Config::Simple('config.ini');

my $set1_param1 = $cfg->param("Set1.param1");
my $set1_param2 = $cfg->param("Set1.param2");
my $set2_param1 = $cfg->param("Set2.param1");

といった感じ。