my $arrayRef = $channels{1};
my $arraySize = scalar @{ $arrayRef };
my $highestIndex = $#{ $arrayRef }; ## == $arraySize - 1;

for my $index ( 0 .. $highestIndex ) {
    print $channels{1}[ $index ]{c}, "\n";
}