Bonjour,

peut-être quand ouvrant correctement le fichier son en lecture :
open(AUDIO, ">$mon_fichier")

au lieu de open(AUDIO, "<$mon_fichier")

a+