# open (FH_SEGMENT_FILE, '<:crlf:encoding(UTF-16LE):raw', $file_segment_name ); open (FH_SEGMENT_FILE, '<:raw:encoding(UTF-16LE):crlf ', $file_segment_name ); @segment_array=; close(FH_SEGMENT_FILE);