{ my $selected= select(LOG); $|++; # Unbuffer output to LOG select( $selected ); }