my $original_fh = select STDOUT; $| = 1; select STDERR; $| = 1; select $original_fh;