[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