use Win32::Console;
...
Win32::Console::OutputCP( 65000 );
...