### Suche im gegebenen Verzeichnis nach *.pod

$ find /usr/lib/perl5 -name "*.pod" | wc -l
299

$ time perl  /tmp/find.pl /usr/lib/perl5/
         Rate ffrule  ffind  gustl
ffrule 17.1/s     --   -66%   -71%
ffind  50.0/s   192%     --   -15%
gustl  59.0/s   245%    18%     --

# Kontrolle, wie viel wurde gefunden
           Gustl: 299
      File::Find: 299
File::Find::Rule: 299

real	0m4.197s
user	0m3.240s
sys	0m0.944s