Sorry, my fault. I was in a hurry and didn't pay much attention to that utf16 and ut8 differencies. The input was in iso8859-2, so I converted it with Unicode::Map and use write_unicode.
Using Encode::decode and write() works fine.

Thanks for replies.