1. 安装方法

ppm install Config::IniFiles

2. 测试用例

#!perl -w #   parse ini file using Config::IniFiles; # use strict; use Cwd; use Config::IniFiles; my $dir = getcwd; my $file = $dir . $ARGV[0]; my %ini; tie %ini,'Config::IniFiles',( -file => $file ); foreach( keys %ini ) {     while (my ($key,$value) = each %{$ini{$_}})     {         print "($key,$value)","\n";     } }