Предупреждения при печати в файл не-UTF

Question

У меня есть этот код для открытия файла:

use Encode qw(:fallbacks);    
$PerlIO::encoding::fallback = FB_PERLQQ;
open my $log,'>:encoding(cp-1251)','log.txt';

Некоторые коды не отображаются на cp-1251, и я вижу предупреждения, такие как «\ x {015f}» не отображается на cp1251 в ... '.Можно ли отключить это предупреждение для определенного дескриптора файла?\ x {015f} в выходном файле мне достаточно.

Answer 1

Я бы попробовал no warnings 'layer'.