binmode FILE;
$line = $unicode . "\xD\0\xA\0";