Discussion :

[sebastien00]

Bonjour,
Je débute dans Perl, J'aimerais bien avoir vos avis sur la faisabilité et la complexité de ma demande. Si vous avez des exemples pour m'aider, n'hésitez pas à me les envoyer.
J'ai des fichiers XML dans un répertoire (IN).
Je souhaite faire un script Perl qui :
- Récupère que dix (par exemple) fichiers XML (les plus anciens) et les déplacer dans un autre répertoire (OUT).

Merci

[Invité]

Salut,

Quel OS utilises-tu?

[sebastien00]

Windows PK. Perl n'est pas indépendant du système d'exploitation?

[Invité]

Bien sûr, mais pas indépendant du système de fichier.

[Jedai]

Bien sûr, mais pas indépendant du système de fichier.

On peut le rendre pratiquement indépendant en utilisant des modules comme File::Spec (dans le CORE) pour toutes les manipulations de chemins.

Bonjour,
Je débute dans Perl, J'aimerais bien avoir vos avis sur la faisabilité et la complexité de ma demande. Si vous avez des exemples pour m'aider, n'hésitez pas à me les envoyer.
J'ai des fichiers XML dans un répertoire (IN).
Je souhaite faire un script Perl qui :
- Récupère que dix (par exemple) fichiers XML (les plus anciens) et les déplacer dans un autre répertoire (OUT).

Relativement facile, consulte notre FAQ pour les bases et la fonction sort() et utilise la fonction move() de File::Copy (présent dans le CORE).
Sache que ça peut être fait en trois ligne de code à peu près.

--
Jedaï

[sebastien00]

Merci pour votre aide.
Je me suis inspiré ou plus tot, j'ai appris grace à la FAQ, comment ouvrir et fermer un repertoire.
Mais je ne sais toujours pas comment faire pour recuperer seulement les 10 fichiers les plus anciens de mon répertoire IN et les déplacer dans un répertoire OUT.
Pour le deplacement, je sais qu'il faut utiliser la fonction Move, ce qui me pose problème, c'est comment retrouver les 10 fichiers les plus anciens.
Merci