in reply to What is the function that does the following..?

You are (most likely) working with UTF-16le text. Decode it. A convenient way for files:
# With LF<->CRLF conversion open(my $fh, '<:raw:perlio:encoding(UTF-16le):crlf', $fn)
# Without LF<->CRLF conversion open(my $fh, '<:raw:perlio:encoding(UTF-16le)', $fn)