in reply to Encode a Utf-8 file to Unicode (TRICKY)

You don't say if just reversing the encoding args doesn't work for you, and if not, why not; ie 
use open IN => ':encoding(UTF-8)', OUT => ':encoding(UCS-2LE)';

[download]

Dave.

In Section Seekers of Perl Wisdom