Discussion :

[flb-iori]

Bonjour a tous,
Je dois modifier tous les fichiers d'un repertoire sur un serveur (mais je pense que ca ne change pas grand chose), je n'arrive deja pas a les recuperer, j'ai essaye ca:

Code :

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

1
2
3
4
5
6
 
#!/usr/bin/perl
$WorkingDir         =  "/home/netadmin/scripts/mrtg/config/mrtg-config";
@cfgfiles      ="ls "$WorkingDir/*.cfg";
print "$WorkingDir\n";
print "$cfgfiles[0]\n";

Le premier print marche bien mais le deuxieme ne donne rien, en essayant de printer le tableau complet (print @cfgfiles) ca donne
/home/netadmin/scripts/mrtg/config/mrtg-config*.cfg
Quelqu'un aurait une idee?

D'avance, merci!

[Jedai]

Notre FAQ explique très bien comment lister les fichiers d'un répertoire en Perl (soit utiliser glob(), soit la série opendir()/readdir()) ou faire appel à un programme externe avec system(), exec() ou les backquotes ``.

--
Jedaï

[flb-iori]

Bonjour,
J'avais deja lu la FAQ et oublie que lq reponse s'y trouvait, desole
La fonction glob marche tres bien, merci et encore desole

[djibril]

n'oublie pas de mettre ton message en résolu