setInterval pour Perl ?

Version imprimable