>>>>> "Stanislaw" == Stanislaw Pusep <[email protected]> writes:
Stanislaw> O find, sendo altamente especializado, é mais
Stanislaw> eficiente... Na minha máquina, o mesmo comando, usando
Stanislaw> "/" ao invés de "/etc", leva 5 segundos, contra 8.6 via
Stanislaw> Perl. Que fique claro: com a tabela de inodes
Stanislaw> cacheada. Ou seja: na 1-a "rodada", qqer um deles demora
Stanislaw> muuuuuuito mais por conta do acesso não-contínuo ao disco
Stanislaw> (a menos que vc tenha SSD, que ajuda).
Fica um pouco mais rápido assim:
perl -MFile::Find -E 'find sub{say $File::Find::name if -f && 1.0 > -M _},
qw(/etc)'
--
Eden Cardim
Software Engineer
+55 73 9986-3963
edencardim.com
=begin disclaimer
Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
SaoPaulo-pm mailing list: [email protected]
L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
=end disclaimer
