BEGIN { if ($^O eq 'MSWin32') { require Win32::Console; Win32::Console::Free( ); } }