Eden+++++++++++<div><br></div><div>Você é o cara ... :-)</div><div><br></div><div>O código para imprimir os dados eu só tive que fazer um ajuste porque tava dando o erro: "Can't use string ("canal_4") as a HASH ref while "strict refs" in use at ./<a href="http://hashes.pl">hashes.pl</a> line 46."</div>
<div><br></div><div>Para funcionar, deixei ele assim:</div><div><div>foreach my $chave (keys %$canais) {</div><div>    print "$chave\n";</div><div>    foreach my $coluna (keys %{$canais->{$chave}}) {</div><div>
<span class="Apple-tab-span" style="white-space:pre"> </span>print "$coluna = $canais->{$chave}{$coluna}\n";</div><div>    }</div><div>}</div></div><div><br></div><div><br></div><div>Na ordenação eu empaquei. O código não dá erro, mais não ordena. Alguma dica? Pesquisei na net, mais não consegui mesmo.</div>
<div><br></div><div><br>[...]'s<br><br>Marcio
</div>