There is a problem:

If I recode string "print 'foo'" to UTF16, I will get "\0p\0r\0i\0n\0t\0 \0'\0f\0o\0o\0'" and if I eval that string, I will get nothing, as the first "\0" will effectively ends the string. Similar problem exists with UTF8.

There is no problem recoding string, egighter Text::Iconv or Unicode::String with Unicode::Map8 can be used, but there is problem evaling UTF8/UTF16 string.