Perl SUN substitution de caracteres.

Bonjour,

il faut que je ponde tres rapidement un script me permettant de remplacer chaque caractère d'un texte par un X lorsque ce texte se trouve uniquement entre deux balises:
<bal1> et </bal1>
-Contrainte n°1 ne devront être remplacé que les caractères alphabétiques et non numériques.
-Contrainte n° 2 j'ai 200 fichiers.
-je suis sous SUN

Je commence à regarder des cours Perl mais j'ai un problème de temps.

Merci beaucoup de votre aide.
Philippe M.