Select Code to Download

    open $OUT, ($^O eq 'MSWin32' ) ? '>CON' : ">/dev/tty"
        or croak "Cannot write to terminal: $!" if !$OUT;
...
        open $IN, ($^O eq 'MSWin32' ) ? '<CON' : ">/dev/tty"
            or croak "Cannot read from terminal: $!";
    }