Select Code to Download

    select(STDIN); $|++;
    select(STDOUT); $|++;
    select(STDERR); $|++;

use IO::Handle;

    STDOUT->autoflush();
    STDERR->autoflush();

$| = 1;