@files = split /\s*,\s*/, $config->{path}{files}; #### foreach my $Section (values %$config) { # $Section is a hash ref containing the values of the section, not th +e section name! foreach my $value (qw(files colors and other options that should be +arrays)) { $Section->{$value} = [split /\s*,\s*/, $Section->{$value}]; } } #### foreach my $value (qw(files colors and other options that should be +arrays)) {