Discussion :

[quefets]

Bonjour,

J'ai développe un programme en C qui fonctionne avec des fichiers de données en entrée et qui me généré des résultats dans des fichiers en sortie.
J'ai donc une arborescence des répertoires.

Voici mon code détaillé et commenté avec les pb rencontrés.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
#!/usr/bin/perl
use strict;
use File::Copy;
 
 
#je supprime tout ce que peut contenir le répertoire tampon et
#le répertoire result/rep1    result/rep2     result/rep3   jusqu'au rep66 j'ai pas fait une boucle car je limite le risque d'erreurs
#je comprends pas car j'ai laissé des prog dans le rep1 et ils 
#ne sont pas supprimés, j'ai utilisé le code de la faq.IL n'y a pas d'erreurs #pourtant!!
 
chdir ("/results/rep1");
unlink glob "*.*";
 
#ensuite
#je commence par copier le contenu des 3 répertoires
#je copie tout le contenu du rep donnee dans tampon et là ça marche pas
 copy(donnel/*.*,tampon);
 
#pour renommer je vais utiliser ce code de la faq mais j''ai pas testé encore
rename ("/tampon/tata.txt", "/tampon/titi.txt");

Merci pour votre aide.

[Jasmine80]

Es-tu certains de tes chemins? Essaie d'ajouter or warn $! pour voir ce qui ne va pas.

Code :

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

chdir ("/results/rep1") or warn $!;

Code :

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

copy(donnel/*.*,tampon) or warn $!;