Discussion :

[Nicolas94]

Bonjour,

J'ai un problème de lecture/écriture de nom de dossier avec espace.
Le fichier dossiers.txt contient la liste des répertoire de mon dossier.
(ex : Mon repertoire)
Résult.txt contient une ligne.
Voila mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
open my $fh1, '<', 'dossiers.txt' or die "$!\n";
while (my $field1 = <$fh1>) {
chomp $field1;
my $result = system ("cat $field1\\result.txt");
print "dossier: $field1\nresult: $result\n\n";
}

Peut être est il inutile de passer par un fichier dossiers.txt mais je ne sais pas faire autrement.
Merci.

Cordialement,
Nicolas.

[Jedai]

Lis plutôt notre FAQ pour apprendre à parcourir un répertoire et n'utilise pas "cat" pour lire des fichiers en Perl... C'est inefficace, peu lisible et trop fragile (sensible aux espaces par exemple).

--
Jedaï