Opened by J-jayz-Z at 2005-04-19 14:36
User since
2005-04-13
625 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2005-04-13
625 Artikel
BenutzerIn
Hi,
ich hab mir ein script geschrieben, das sleep(); nutzen soll, allerdings geht das nicht ganz so, wie ich es vor hatte...
Ich dachte, das mein Beispiel H ausgibt, eine sekunde wartet, a ausgibt, wieder ne sekunde wartet, l ausgibt, wieder ne sekunde warten, nochmal l ausgibt und ne sekunde wartet und dann o ausgibt, nach einer sekunde.
allerdings wartet das script 4 sekunden und gibt dann Hallo auf einmal aus. Kann mir jemand sagen, wie ich das realisieren kann und mir erklären, wieso sleep(); das nicht macht?
thx
ich hab mir ein script geschrieben, das sleep(); nutzen soll, allerdings geht das nicht ganz so, wie ich es vor hatte...
Ich dachte, das mein Beispiel H ausgibt, eine sekunde wartet, a ausgibt, wieder ne sekunde wartet, l ausgibt, wieder ne sekunde warten, nochmal l ausgibt und ne sekunde wartet und dann o ausgibt, nach einer sekunde.
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
#!/usr/bin/perl
use strict;
use warnings;
print "H";
sleep(1);
print "a";
sleep(1);
print "l";
sleep(1);
print "l"
sleep(1);
print "o";
allerdings wartet das script 4 sekunden und gibt dann Hallo auf einmal aus. Kann mir jemand sagen, wie ich das realisieren kann und mir erklären, wieso sleep(); das nicht macht?
thx
perl -Mstrict -Mwarnings -e 'package blub; sub new { bless {} } sub bar {my $self=shift; $self->{bla}="5065726c2d436f6d6d756e697479"; return $self->{bla};} my $foo=blub->new();print "Hallo ";print pack("H*",$foo->bar()); print "\n"'
http://perl-tutor.de
http://perl-tutor.de