Analyse de fichiers CSV à partir de plusieurs dossiers - Perl

J'ai un dossier qui contient plusieurs sousdossiers et chaque sous-dossier contient différents types de fichiers et contient parfois un fichier appelé run.csv. Cependant, le fichier CSV est toujours nommé run.csv et comprend toujours les colonnes id, lane, index et autres.

Je sais comment analyser les fichiers CSV mais je ne peux pas comprendreDécouvrez comment parcourir en boucle les sous-dossiers et imprimer toutes les colonnes id, lane et index sans les informations d’en-tête de tous les fichiers CSV à la fin. Pour cela, je devrais utiliser idéalement le langage Perl.

Réponses:

Je pense que ce que tu veux c'est glob:

foreach my $csv_file ( glob "/path/to/dir/*/run.csv" ) {
#process CSV.
}

Mais c’est possible que vous vouliez File::Find::Rule:

foreach my $file ( File::Find::Rule -> name ("run.csv") -> in ( "/path/to/dir" ) ) {
print $file,"n";
}

Ce qui fait la même chose, mais de manière récursive. Dans les deux cas, vous obtenez un chemin relatif vers le répertoire en cours, vous pouvez donc le transmettre directement à open.