On Tue, Jun 26, 2001 at 03:42:34PM -0400, Yacketta, Ronald wrote:
> what gives, I open a FH (open OFN ">>junk.out" );
> I autoflush..
> $| = 1;
>
> do some parsing.. do some other gook
> then go and print OFN "my output crud\n";
> but yet, nothing is in file... UNTIL I close(OFN);
> Huh? me loosing it here.. bring me back to sanity please ;-P
$| works on the currently selected filehandle.
my $oldfh = select(OFN); $| = 1; select($oldfh);
or, if you don't like temporaries.
select((select(OFN), $| = 1)[0]);
perldoc -f select
--
Paul Johnson - [EMAIL PROTECTED]
http://www.pjcj.net
