Help for this page

Select Code to Download


  1. or download this
    my $old = select $fh;
$|++;
select $old;
  2. or download this
    sub autoflush {
    my $fh;
...
    $|++;
    select $old;
}