in reply to Lowering my STDards :)

Here's a one-line sample from my Mplayer control script:

select((select($scr[$po]), $| = 1)[0]);  #damn buffering...

You would probably want:

select((select(STDOUT), $| = 1)[0]);

Replies are listed 'Best First'.
Re^2: Lowering my STDards :)
by Anonymous Monk on Jun 09, 2008 at 09:02 UTC
    The easiest way is this: use IO::Handle; ... print "Some text that would be buffered since it does not contain newline"; STDOUT->flush();
[reply]

In Section Seekers of Perl Wisdom