to post messages and comments.

Жуйк, подсказывай что не так?

#!/usr/bin/perl
use warnings;
use strict;

my %config;
my $path = "config.conf";
if (-e $path) {
open(CONFREAD, $path);
while (<CONFREAD>) {
chomp;
if (! ^#) {
my @conf = split(/=/);
$config{$conf[0]} = $conf[1];
}
}
close CONFREAD;
}

Посмотреть в более читаемом виде можно здесь: pastie.org

Ругается на строку $config{$conf[0]} = $conf[1]; Я не могу в хеш к ключу добавить значение. Вот уже второй раз сталкиваюсь с такой ошибкой. Первый раз просто забил на нее, так как там был ознакомительный код из учебника. А этот быдлокод пишу сам, так что хотелось бы иметь рабочий вариант сего. ЧЯДНТ?