use if $VersionOS eq 'Win', Win32::OLE 'CP_UTF8';