Senhores,<br><br> Qual a forma mais otimizada de escrever isso?<br><br>minha apliccao passa por varios diretorios de maneira recursiva<br><br>for my $eachFile (glob($source_str.'*')) {<br>...<br>}<br clear="all">
<br>e eu desejo armazenar apenas o ultimo diretorio em uma hash de controle, para tanto estou criando em cada iteracao um array temporario e dando um split e pegando o ultimo elemento, acho meio ineficiente<br><br>my @tmp = split("/",$eachFile);<br>
$result_data_hash_pointer->{$dir_count_int}->{name_str} = $tmp[-1];<br><br>Alguem tem alguma dica?<br><br>estou enviando o script anexo.<br>-- <br>Abs,<br>Pedro Anisio<br>