Добрый день.
Увидел в чужом коде вот такой способ создания многомерных хешей:my %hash=();
$hash{$row}{$col} = 'test';Доставли из него данные вот так:
foreach my $row (keys %hash){
foreach my $col (keys %{hash{$row}}){
print $hash{$row}{$col};
}
}Я первый раз такое вижу и в моем Perl v5.8.6 эта конструкция не работает.
Ругается на синтаксис в строке foreach my $col (keys %{hash{$row}}){Вопрос закрыт, я протупил. Там ошибка в коде. Уже разобрался.
Как-то можно свои сообщения удалять?
> foreach my $col (keys %{hash{$row}}){
должно быть%{$hash{$row}}
т.е.
foreach my $col (keys %{$hash{$row}}){