use Win32::OLE 'CP_UTF8';
Win32::OLE->Option(  CP => CP_UTF8 );

##</code><code>##

use Devel::Peek;
Dump $text;