Port this functionality from to Windows.
It requires Win32::Console module, which is already included into
Strawberry perl