Perl: Lister les fichiers d’un répertoire qui contiennent des textes