[perl #121450] can't read pinyin characters from terminal

On Sun Mar 16 00:41:07 2014, ntysdd@gmail.com wrote:
> Reply-To: ntysdd@gmail.com
> Subject: can't read pinyin characters from terminal
> To: perlbug@perl.org
> Message-Id: <5.18.2_3700_1394954556@aaa-PC>
> From: ntysdd@gmail.com
> 
> 
> This is a bug report for perl from ntysdd@gmail.com,
> generated with the help of perlbug 1.39 running under perl 5.18.2.
> 
> 
> -----------------------------------------------------------------
> [Please describe your issue here]
> Using strawberryperl portable under a simplified Chinese env.(CP936)
> Found perl can't read pinyin chars properly from a terminal.
> > 
> 
> [Please do not change anything below this line]
> -----------------------------------------------------------------
> ---
> Flags:
>     category=core
>     severity=low
> ---
> Site configuration information for perl 5.18.2:
> 
> Configured by strawberry-perl at Tue Jan  7 16:32:09 2014.
> 
> Summary of my perl5 (revision 5 version 18 subversion 2)
> configuration:
> 
> Platform:
>   osname=MSWin32, osvers=6.2, archname=MSWin32-x86-multi-thread-64int
>   uname='Win32 strawberry-perl 5.18.2.1 #1 Tue Jan  7 16:30:36 2014
> i386'
>   config_args='undef'
>   hint=recommended, useposix=true, d_sigaction=undef
>   useithreads=define, usemultiplicity=define
>   useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
>   use64bitint=define, use64bitall=undef, uselongdouble=undef
>   usemymalloc=n, bincompat5005=undef
> Compiler:
>   cc='gcc', ccflags =' -s -O2 -DWIN32  -DPERL_TEXTMODE_SCRIPTS
> -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO
> -fno-strict-aliasing -mms-bitfields',
>   optimize='-s -O2',
>   cppflags='-DWIN32'
>   ccversion='', gccversion='4.7.3', gccosandvers=''
>   intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=12345678
>   d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
>   ivtype='long long', ivsize=8, nvtype='double', nvsize=8,
> Off_t='long long', lseeksize=8
>   alignbytes=8, prototype=define
> Linker and Libraries:
>   ld='g++.exe', ldflags ='-s -L"F:\mono\perl\perl\lib\CORE"
> -L"F:\mono\perl\c\lib"'
>   libpth=F:\mono\perl\c\lib F:\mono\perl\c\i686-w64-mingw32\lib
> F:\mono\perl\c\lib\gcc\i686-w64-mingw32\4.7.3
>   libs=-lmoldname -lkernel32 -luser32 -lgdi32 -lwinspool -lcomdlg32
> -ladvapi32 -lshell32 -lole32 -loleaut32 -lnetapi32 -luuid -lws2_32
> -lmpr -lwinmm -lversion -lodbc32 -lodbccp32 -lcomctl32
>   perllibs=-lmoldname -lkernel32 -luser32 -lgdi32 -lwinspool
> -lcomdlg32 -ladvapi32 -lshell32 -lole32 -loleaut32 -lnetapi32 -luuid
> -lws2_32 -lmpr -lwinmm -lversion -lodbc32 -lodbccp32 -lcomctl32
>   libc=, so=dll, useshrplib=true, libperl=libperl518.a
>   gnulibc_version=''
> Dynamic Linking:
>   dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' '
>   cccdlflags=' ', lddlflags='-mdll -s -L"F:\mono\perl\perl\lib\CORE"
> -L"F:\mono\perl\c\lib"'
> 
> Locally applied patches:
> 
> 
> ---
> @INC for perl 5.18.2:
>     F:/mono/perl/perl/site/lib
>     F:/mono/perl/perl/vendor/lib
>     F:/mono/perl/perl/lib
>     .
> 
> ---
> Environment for perl 5.18.2:
>     HOME (unset)
>     LANG=zh_CN
>     LANGUAGE (unset)
>     LD_LIBRARY_PATH (unset)
>     LOGDIR (unset)
>     PATH=F:\mono\perl\perl\site\bin;F:\mono\perl\perl\bin;F:\mono\perl\c\bin;C:\Program
> Files\Broadcom\Broadcom 802.11 Network
> Adapter;;C:\Windows\system32;C:\Windows;C:\Windows\System32\Wbem;C:\Windows\System32\WindowsPowerShell\v1.0\;C:\Program
> Files\Windows Kits\8.1\Windows Performance Toolkit\;C:\Program
> Files\Microsoft SQL Server\110\Tools\Binn\;C:\Program
> Files\GNU\GnuPG\pub
>     PERL_BADLANG (unset)
>     SHELL (unset)



> Example:
> > perl -ne "print"
> > nǐtàiyánsù
> n t iy ns
> 
> Chinese characters are OK.
> Reading from a file using redirection is also OK.
> Only terminal plus pinyin will get wrong.
> 

Can anyone familiar with CP936 reproduce this?

---
via perlbug:  queue: perl5 status: new
https://rt.perl.org/Ticket/Display.html?id=121450

• [perl #121450] can't read pinyin characters from terminal by James E Keenan via RT
• Re: [perl #121450] can't read pinyin characters from terminal by Karl Williamson