Блог

Главная - Вопросы по программированию - Термин::ReadLine: возвращает значения строки чтения

Термин::ReadLine: возвращает значения строки чтения

#perl #encoding #terminal #console #readline

#perl #кодирование #терминал #консоль #строка чтения

Вопрос:

Чтобы получить правильный вывод в следующем скрипте, я должен декодировать значение, возвращаемое readline .

Можно ли с уверенностью предположить, что декодирование возвращаемого значения readline требуется для всех бэкэндов Term::ReadLine? 

 #!/usr/bin/env perl
use warnings;
use strict;
use 5.10.0;

use Encode;
use Encode::Locale;
use Term::ReadLine;
binmode STDOUT, ':encoding(console_out)';

my $term = Term::ReadLine->new( 'readline' );
say $term->ReadLine;    # Term::ReadLine::Gnu
my $line = $term->readline( ':' );

say decode( 'console_in', $line );