Bug #85379 for Sys-Cmd: Unicode character in prompt fails tests

I've already worked around this by changing my prompt temporarily, but it appears that when you have a unicode character in your prompt, several tests fail. -Scott /home/duff/.cpanm/work/1368801164.20959/Sys-Cmd-0.08 ➤ make test Skip blib/lib/Sys/Cmd/Template.pm (unchanged) cp lib/Sys/Cmd.pm blib/lib/Sys/Cmd.pm Skip blib/lib/Sys/Cmd.pod (unchanged) Skip blib/lib/Sys/Cmd/Template.pod (unchanged) PERL_DL_NONLAZY=1 /home/duff/perl5/perlbrew/perls/perl-5.16.2/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(0, 'inc', 'blib/lib', 'blib/arch')" t/10-command.t t/11-reaper.t t/90-command.t t/90-output.t t/template.t t/10-command.t .. 1/93 # Failed test 'perl t/info.pl' # at t/10-command.t line 137. Wide character in print at /home/duff/perl5/perlbrew/perls/perl-5.16.2/lib/5.16.2/Test/Builder.pm line 1759. # Structures begin differing at: # $got->{env}{PS1} = '$PWD$(__git_ps1 " [%s]")\n➤ ' # $expected->{env}{PS1} = '$PWD$(__git_ps1 " [%s]")\n➤ ' # Failed test 'perl t/info.pl' # at t/10-command.t line 137. Wide character in print at /home/duff/perl5/perlbrew/perls/perl-5.16.2/lib/5.16.2/Test/Builder.pm line 1759. # Structures begin differing at: # $got->{env}{PS1} = '$PWD$(__git_ps1 " [%s]")\n➤ ' # $expected->{env}{PS1} = '$PWD$(__git_ps1 " [%s]")\n➤ ' # Failed test 'perl t/info.pl' # at t/10-command.t line 137. Wide character in print at /home/duff/perl5/perlbrew/perls/perl-5.16.2/lib/5.16.2/Test/Builder.pm line 1759. # Structures begin differing at: # $got->{env}{PS1} = '$PWD$(__git_ps1 " [%s]")\n➤ ' # $expected->{env}{PS1} = '$PWD$(__git_ps1 " [%s]")\n➤ ' # Failed test 'perl t/info.pl' # at t/10-command.t line 137. Wide character in print at /home/duff/perl5/perlbrew/perls/perl-5.16.2/lib/5.16.2/Test/Builder.pm line 1759. # Structures begin differing at: # $got->{env}{PS1} = '$PWD$(__git_ps1 " [%s]")\n➤ ' # $expected->{env}{PS1} = '$PWD$(__git_ps1 " [%s]")\n➤ ' # Failed test 'perl t/info.pl' # at t/10-command.t line 137. Wide character in print at /home/duff/perl5/perlbrew/perls/perl-5.16.2/lib/5.16.2/Test/Builder.pm line 1759. # Structures begin differing at: # $got->{env}{PS1} = '$PWD$(__git_ps1 " [%s]")\n➤ ' # $expected->{env}{PS1} = '$PWD$(__git_ps1 " [%s]")\n➤ ' # Failed test 'perl t/info.pl' # at t/10-command.t line 137. Wide character in print at /home/duff/perl5/perlbrew/perls/perl-5.16.2/lib/5.16.2/Test/Builder.pm line 1759. # Structures begin differing at: # $got->{env}{PS1} = '$PWD$(__git_ps1 " [%s]")\n➤ ' # $expected->{env}{PS1} = '$PWD$(__git_ps1 " [%s]")\n➤ ' # Failed test 'perl t/info.pl' # at t/10-command.t line 137. Wide character in print at /home/duff/perl5/perlbrew/perls/perl-5.16.2/lib/5.16.2/Test/Builder.pm line 1759. # Structures begin differing at: # $got->{env}{PS1} = '$PWD$(__git_ps1 " [%s]")\n➤ ' # $expected->{env}{PS1} = '$PWD$(__git_ps1 " [%s]")\n➤ ' # Looks like you failed 7 tests of 93. t/10-command.t .. Dubious, test returned 7 (wstat 1792, 0x700) Failed 7/93 subtests t/11-reaper.t ... ok t/90-command.t .. skipped: Test::Command not available t/90-output.t ... ok t/template.t .... ok Test Summary Report ------------------- t/10-command.t (Wstat: 1792 Tests: 93 Failed: 7) Failed tests: 10, 23, 36, 49, 62, 75, 88 Non-zero exit status: 7 Files=5, Tests=108, 1 wallclock secs ( 0.04 usr 0.00 sys + 0.37 cusr 0.07 csys = 0.48 CPU) Result: FAIL Failed 1/5 test programs. 7/108 subtests failed. make: *** [test_dynamic] Error 255 ➤ perl -V Summary of my perl5 (revision 5 version 16 subversion 2) configuration: Platform: osname=linux, osvers=3.2.0-32-generic-pae, archname=i686-linux uname='linux cbi-0949357 3.2.0-32-generic-pae #51-ubuntu smp wed sep 26 21:54:23 utc 2012 i686 i686 i386 gnulinux ' config_args='-de -Dprefix=/home/duff/perl5/perlbrew/perls/perl-5.16.2' hint=recommended, useposix=true, d_sigaction=define useithreads=undef, usemultiplicity=undef useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef use64bitint=undef, use64bitall=undef, uselongdouble=undef usemymalloc=n, bincompat5005=undef Compiler: cc='cc', ccflags ='-fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64', optimize='-O2', cppflags='-fno-strict-aliasing -pipe -fstack-protector -I/usr/local/include' ccversion='', gccversion='4.6.3', gccosandvers='' intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12 ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8 alignbytes=4, prototype=define Linker and Libraries: ld='cc', ldflags =' -fstack-protector -L/usr/local/lib' libpth=/usr/local/lib /lib/i386-linux-gnu /lib/../lib /usr/lib/i386-linux-gnu /usr/lib/../lib /lib /usr/lib libs=-lnsl -ldb -ldl -lm -lcrypt -lutil -lc perllibs=-lnsl -ldl -lm -lcrypt -lutil -lc libc=, so=so, useshrplib=false, libperl=libperl.a gnulibc_version='2.15' Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E' cccdlflags='-fPIC', lddlflags='-shared -O2 -L/usr/local/lib -fstack-protector' Characteristics of this binary (from libperl): Compile-time options: HAS_TIMES PERLIO_LAYERS PERL_DONT_CREATE_GVSV PERL_MALLOC_WRAP PERL_PRESERVE_IVUV USE_LARGE_FILES USE_LOCALE USE_LOCALE_COLLATE USE_LOCALE_CTYPE USE_LOCALE_NUMERIC USE_PERLIO USE_PERL_ATOF Built under linux Compiled at Nov 5 2012 11:41:18 %ENV: PERLBREW_BASHRC_VERSION="0.42" PERLBREW_HOME="/home/duff/.perlbrew" PERLBREW_MANPATH="/home/duff/perl5/perlbrew/perls/perl-5.16.2/man" PERLBREW_PATH="/home/duff/perl5/perlbrew/bin:/home/duff/perl5/perlbrew/perls/perl-5.16.2/bin" PERLBREW_PERL="perl-5.16.2" PERLBREW_ROOT="/home/duff/perl5/perlbrew" PERLBREW_VERSION="0.61" PERL_MM_USE_DEFAULT="1" @INC: /home/duff/perl5/perlbrew/perls/perl-5.16.2/lib/site_perl/5.16.2/i686-linux /home/duff/perl5/perlbrew/perls/perl-5.16.2/lib/site_perl/5.16.2 /home/duff/perl5/perlbrew/perls/perl-5.16.2/lib/5.16.2/i686-linux /home/duff/perl5/perlbrew/perls/perl-5.16.2/lib/5.16.2 .