Select Code to Download

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

    require IO::Handle;
    LOG->autoflush(1);