RE: [PERL] sleep i en loekke virker ikke

["Jesper Dalberg" <sslug@sslug>]

> Et eksempel:
> 
> ----------------------------
> #!/usr/bin/perl
> use strict;
> use warnings;

$|=1;

> my @array = (1..5);
> for (reverse(@array))
> {
>     print "$_..";
>     sleep 1;
> }
> print " BLAST OFF\n";
> exit(0);
> ---------------------------
> 
> Her kommer hele linien paa en gang efter fem sekunders ventetid.
> 
> Hvorfor sker det?
>

Perl cacher STDIO hvis du ikke explicit beder om andet.

$|=1; # beder explicit om non-buffred output

/Jesper