bonjour je voulais savoir comment pour faire ce qui suit en perl :

Merci d'avance.