[SP-pm] Melhor forma de escrever
Nelson Ferraz
nferraz at gmail.com
Sun Feb 8 16:42:01 PST 2009
2009/2/8 Pedro Anisio <pedroanisio em gmail.com>:
> Senhores,
>
> Qual a forma mais otimizada de escrever isso?
>
> minha apliccao passa por varios diretorios de maneira recursiva
use File::Find;
find( sub { print "$File::Find::name\n" } , @directories_to_search );
Você pode usar as variáveis $File::Find::dir para obter o diretório,
ou $_ para apenas o nome do arquivo. (Sem o caminho)
Para mais informações:
http://search.cpan.org/~nwclark/perl-5.8.9/lib/File/Find.pm
More information about the SaoPaulo-pm
mailing list