[perl] Typewriter like

Résolu/Fermé
fxtaa Messages postés 1050 Date d'inscription mardi 20 octobre 2009 Statut Membre Dernière intervention 2 avril 2015 - 15 déc. 2009 à 15:56
fxtaa Messages postés 1050 Date d'inscription mardi 20 octobre 2009 Statut Membre Dernière intervention 2 avril 2015 - 15 déc. 2009 à 16:22
Bonjour, j'ai essayé de faire un truc marrant, je n'ai pas réussit alors maintenant ca m'obsede... je suis sûr qu'il y a un moyen de réaliser cet effet.
L'effet où les lettre apparaissent les unes après les autres un peu comme ci quelqu'un tapait réellement au clavier.... (oui oui c est inutile... donc indispensable à savoir faire !)

Au début j'ai fait ca :
print "b";
sleep (1);
print "o";
sleep (1);
print "n";
sleep (1);
print "j";
sleep (1);
print "o";
sleep (1);
print "u";
sleep (1);
print "r";
sleep (1);



Malheuresement Perl fait la somme des sleep.... gros malin.... un sleep est pris en compte apres un retour a la ligne....

Any ideas ?

2 réponses

dubcek Messages postés 18718 Date d'inscription lundi 15 janvier 2007 Statut Contributeur Dernière intervention 22 mars 2024 5 615
15 déc. 2009 à 16:17
2
fxtaa Messages postés 1050 Date d'inscription mardi 20 octobre 2009 Statut Membre Dernière intervention 2 avril 2015 74
15 déc. 2009 à 16:22
\o/ merci!
0