Deux des 3 ou 4 grosses âneries de Perl 5 :
perl -e 'printf "%02d/%02d/%d\n", (gmtime())[3, 4, 5]'
qui donne :
06/05/104
Pourquoi avoir numéroté les mois de 0 à 11 ?
L'argument de l'indexation d'un tableau par $mm ne tient pas, il est facile d'écrire
print "Le joli mois de $mois[$mm-1]"
Quant au nombre magique 1900...