Perl Term::Readline:编码问题
当我输入“Müller”时,屏幕上出现“Müller”。我怎样才能解决这个问题Perl Term::Readline:编码问题,perl,encoding,terminal,readline,Perl,Encoding,Terminal,Readline,当我输入“Müller”时,屏幕上出现“Müller”。我怎样才能解决这个问题 #!/usr/bin/env perl use warnings; use 5.012; use Term::ReadLine; my $term = Term::ReadLine->new( 'dummy' ); my $con = $term->readline( ': ' ); say $con; # On the screen: # : M��ller
#!/usr/bin/env perl
use warnings;
use 5.012;
use Term::ReadLine;
my $term = Term::ReadLine->new( 'dummy' );
my $con = $term->readline( ': ' );
say $con;
# On the screen:
# : M��ller
# Müller
将
:utf8
层应用于文件句柄STDIN
和STDOUT
,并将它们作为参数传递给Term::ReadLine->new()
:
binmode STDIN, ':utf8';
binmode STDOUT, ':utf8';
my $term = Term::ReadLine->new( 'dummy', \*STDIN, \*STDOUT );