以Perl解析INI（列表格式）

Question

在Perl中解析ini文件的最佳方法是什么？

文件格式如下：

[group1]
value1
value2
value3

[group2]
value1
value2
value3
value4

[group3]
value1
value2

Answer 1

您没有告诉我们数据的预期格式或没有显示任何现有代码，因此无法知道您要查找的内容，但这至少可以为您提供90％的解决方法：

use strict;
use warnings;

use Data::Dumper;

my %config;
my $group = '';

while (<DATA>) {
    chomp;
    next unless /\S/;

    if (/^\[([^]]+)\]/) {
        $group = $1;
        next;
    }

    push(@{$config{$group}}, $_);
}

print Dumper(\%config);

__DATA__
[group1]
value1
value2
value3

[group2]
value1
value2
value3
value4

[group3]
value1
value2