Digg StumbleUpon LinkedIn YouTube Flickr Facebook Twitter RSS Reset
Comments Off

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

Your ads will be inserted here by

Easy AdSense.

Please go to the plugin admin page to paste your ad code.


Download

#!/usr/local/bin/perl
 
$dir = "c:/";
print "Voici les fichier textes de $dir:\n";
opendir(BIN, $dir) or die "Impossible d'ouvrir le dossier $dir: $!";
while( $fichier = readdir BIN) {
    print "$fichier\n" if -T "$dir/$fichier";
}
closedir(BIN);

Comments are closed.