Re: Counting (easy!) - select???

[Christiane Nerz]

quite interesting chunk of code - but what the hell does select does here?
Yeah - I rtfm - but didn't understand it - maybe one could explain it in 
more simple words?
Jane

Kevin Old wrote:

....
What I wanted to do was to make each number appear in sequence like you see 
in a countdown (or up, in this case) instead of all on the screen at once. 
....



Try this code....either of these might be what you're looking for

#!/usr/bin/perl
#
use warnings;
use strict;
print "printing 1thru5 with buffering\n";
select undef, undef, undef, 0.25 or print $_
  for 1 .. 5;
print "\nflush forced\n";
$|++;
print "printing 1thru5 without buffering\n";
select undef, undef, undef, 0.25 or print $_
  for 1 .. 5;
print "\nflush forced\n";
Hope this helps,





--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]