# find all the .pm files in @INC
  my @files = File::Find::Rule->file()
                              ->name( '*.log' )
                              ->maydepth(1)
                              ->in( @my_dirs );