Comment encoder le contenu d'une image en code Base64 ?

Il est souvent très utile de convertir un fichier, notamment une image png, gif... en une chaine encodée en Base64. Cela nous permet souvent d'insérer cette chaine dans un programme afin d'éviter d'avoir un fichier à part.

Le code que je vous propose prend en argument une ou plusieurs images et crée un ou plusieurs fichiers txt avec l'extension _base64.txt.

USAGE : perl C:\test.pl -i image1.gif -i image2.png ...

Résultat : image1_Base64.txt image2_Base64.txt