запись не UTF8 символов в файл в Perl

Question

Внутри скрипта на Perl я записываю строки во временный файл, созданный следующим образом:

IO::File->new_tmpfile

Как я могу написать таким же образом, не utf8 символов?

Answer 1

Ваш IO :: File объект имеет метод binmode, который работает точно так же, как встроенный с тем же именем .Вы используете это, чтобы установить требуемый уровень ввода / вывода.Вы, вероятно, хотите что-то вроде:

$fh->binmode(':utf8'); # or whatever character encoding you're using

Answer 2

IO::File->new_tmpfile возвращает дескриптор файла. Вы можете просто print к дескриптору файла обычным способом.

 $fh = IO::File->new_tmpfile;
 print $fh "some stuff to write to the temp file.\n";