execution dans un odre bizard ;o/

Bonjour à tous,
je ne comprend pas bien une chose, j'ai le code suivant :


while ($ServerName) {
print "\r\nDebut de la recup des mails";
check_mails();
print "\r\nFin du traitement";
print "\r\nPause de 10 minutes";
#pause de 2 mins
faire_pause(2);
print "\r\nFin de la pause";
}

sub faire_pause {
##^procédure d'attente
##attend comme argument le nombre de secondes
##ne renvoi rien
#recup du nombre de secondes à attendre
my $temp_pause = shift(@_);
#conversion du temps en minutes
$pause_minute = 60 * $temp_pause;
sleep $pause_minute;

}

pourquoi est-ce que dans ma console, les messages Fin du traitement, et
pause de 10 minutes
ne s'affichent qu'après l'execution de la fonction faire_pause() ?

Merci d'avance ;o)