develooper Front page | perl.perl5.porters | Postings from September 2000

[ID 20000901.097] undef . utf8 == undef

From:
Marc Lehmann
Date:
September 1, 2000 20:20
Subject:
[ID 20000901.097] undef . utf8 == undef
Message ID:
E13V3qW-0008UP-00.pgcc-forever-2000-09-02-05-19-56@cerebro
This is a bug report for perl from root@cerebro.laendle,
generated with the help of perlbug 1.32 running under perl v5.7.0.


-----------------------------------------------------------------
[Please enter your report here]

concat'ing utf8-strings to undefined values yields funny values:

 $x .= "\x{5555}";
 print "$x\n";

yields only a newline. Devel::Peek thinks that $x is:

SV = PV(0x8110440) at 0x8110218
   REFCNT = 1
   FLAGS = (PADBUSY,PADMY,UTF8)
   PV = 0x811181c "\351\246\231"\0
   CUR = 3
   LEN = 4

[Please do not change anything below this line]
-----------------------------------------------------------------
---
Flags:
    category=core
    severity=high
---
Site configuration information for perl v5.7.0:

Configured by root at Sat Sep  2 02:27:43 CEST 2000.

Summary of my perl5 (revision 5.0 version 7 subversion 0) configuration:
  Platform:
    osname=linux, osvers=2.2, archname=i686-linux
    uname='linux cerebro 2.2.16 #6 smp tue aug 15 16:14:57 cest 2000 i686 unknown '
    config_args=''
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=undef
    useperlio=undef d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=undef use64bitall=undef uselongdouble=undef
  Compiler:
    cc='gcc', ccflags ='-I/usr/local/include -I/usr/app/include -fstrict-aliasing -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64', optimize='-Os -funroll-all-loops -mpentium', cppflags='-I/usr/local/include -I/usr/app/include -fstrict-aliasing'
    ccversion='', gccversion='pgcc-2.95.2 19991024 (release)', 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, usemymalloc=y, prototype=define
  Linker and Libraries:
    ld='gcc', ldflags ='-L/usr/local/lib -L/usr/app/lib'
    libpth=/usr/local/lib /lib /usr/lib /usr/app/lib
    libs=-ldl -lm -lc  -lcrypt
    libc=/lib/libc-2.1.3.so, so=so, useshrplib=false, libperl=libperl.a
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-rdynamic'
    cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib -L/usr/app/lib'

Locally applied patches:
    DEVEL7001

---
@INC for perl v5.7.0:
    /usr/app/lib/perl5
    /usr/app/lib/perl5
    /usr/app/lib/perl5
    /usr/app/lib/perl5
    .

---
Environment for perl v5.7.0:
    HOME=/root
    LANG (unset)
    LANGUAGE (unset)
    LC_CTYPE=de_DE
    LD_LIBRARY_PATH (unset)
    LOGDIR (unset)
    PATH=:/usr/app/FM556_linux/bin:/root/cc/dejagnu/bin:.:/root/s:/bin:/sbin:/usr/bin:/usr/sbin:/usr/local/bin:/usr/local/sbin:/usr/app/bin:/usr/app/sbin:/usr/X11/bin:/opt/jdk118/bin:/opt/bin:/localvol/usr/app/insure++/bin.linux
    PERLDB_OPTS=ornaments=0
    PERL_BADLANG (unset)
    SHELL=/bin/bash




nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About