${ EXPR1 }[ EXPR2 ]
- альтернативный способ записи
EXPR1->[ EXPR2 ]
, поэтому
${ $chainro->{$ro}->{$id} }[$i]
можно записать как
$chainro->{$ro}->{$id}->[$i]
или даже как
$chainro->{$ro}{$id}[$i]
Очищено:
for my $id (keys %{ $chainro->{$ro} }) {
my $files = $chainro->{$ro}{$id};
for my $i (0..$#$files) {
my $file = $files->[$i];
...
}
}
Или, если вам не нужно $i
:
for my $id (keys %{ $chainro->{$ro} }) {
my $files = $chainro->{$ro}{$id};
for my $file (@$files) {
...
}
}