Pour cette première boîte à outils, nous souhaitons écrire un script en perl qui soit capable de parcourir notre arborescence et, qui pour une rubrique donnée en argument, produise deux types de sorties: une sortie en texte brut et une sortie XML. Ces sorties contiennent les titres et descriptions de nos fils RSS.
La fonction parcoursArborescenceFichiers est récursive, c'est à dire qu'elle se rappelle elle-même tant qu'une condition n'est pas satisfaite. Ici, chaque fois que "l'objet" rencontré est un dossier, nous rappelons la fonction afin de descendre dans l'arbre constitué par l'architecture de nos dossiers.
A l'intérieur de ce premier script, plusieurs traitements sont mis en place afin de supprimer les doublons, nettoyer les contenus textuels et remplacer certaines entités par le caractère approprié.
A la sortie de cette BàO1 et pour chaque rubrique nous avons :
-Une sortie txt
-Une sortie XML