[ID 20000126.002] setting $handle->input_record_separator changes global $/

[Arjen Bax <arjen.bax@cmg.nl>]

This is a bug report for perl from arjen.bax@cmg.nl,
generated with the help of perlbug 1.26 running under perl 5.00503.


-----------------------------------------------------------------

Calling $handle->input_record_separator(undef) for an object of type
FileHandle seems to change the global i.r.s. $/, causing subsequently
opened files to be opened in "slurp" mode.

This bug was previously reported in 1997 (see
http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/1997-11/msg01170.html
), but I couldn't find any record that it was solved.

-----------------------------------------------------------------

---
Site configuration information for perl 5.00503:

Configured by gwingerde at Sat Jan 15 23:59:29 MET 2000.

Summary of my perl5 (5.0 patchlevel 5 subversion 3) configuration:
  Platform:
    osname=dec_osf, osvers=4.0, archname=alpha-dec_osf
    uname='osf1 wsbdev2 v4.0 1229 alpha '
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=undef useperlio=undef d_sfio=undef
  Compiler:
    cc='cc', optimize='-O4', gccversion=
    cppflags='-std -ieee -D_INTRINSICS -I/usr/local/include -DLANGUAGE_C'
    ccflags ='-std -fprm d -ieee -D_INTRINSICS -I/usr/local/include
-DLANGUAGE_C'
    stdchar='unsigned char', d_stdstdio=define, usevfork=false
    intsize=4, longsize=8, ptrsize=8, doublesize=8
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=8
    alignbytes=8, usemymalloc=y, prototype=define
  Linker and Libraries:
    ld='ld', ldflags ='-Wl,-oldstyle_liblookup -L/usr/local/lib'
    libpth=/usr/local/lib /usr/shlib /usr/ccs/lib /usr/lib/cmplrs/cc
/usr/lib /var/shlib
    libs=-ldbm -ldb -lm
    libc=/usr/shlib/libc.so, so=so, useshrplib=true, libperl=libperl.so
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='
-Wl,-rpath,/usr/local/lib/perl5/5.00503/alpha-dec_osf/CORE'
    cccdlflags=' ', lddlflags='-shared -expect_unresolved "*" -O4 -msym -s
-L/usr/local/lib'

Locally applied patches:
    

---
@INC for perl 5.00503:
    /usr/local/lib/perl5/5.00503/alpha-dec_osf
    /usr/local/lib/perl5/5.00503
    /usr/local/lib/perl5/site_perl/5.005/alpha-dec_osf
    /usr/local/lib/perl5/site_perl/5.005
    .

---
Environment for perl 5.00503:
    HOME=/home/abax
    LANG (unset)
    LANGUAGE (unset)
 
LD_LIBRARY_PATH=/home/abax/wap/lib:/home/abax/wap/lib:/usr/local/w3c-libwww/
lib:/usr/local/lib:/usr/lib:/lib
    LOGDIR (unset)
 
PATH=/usr/local/bin/gvim:/home/abax/wap/bin:/home/abax/wap/bin:/usr/local/bi
n:/usr/bin:/bin:/usr/sbin:/sbin:.
    PERL_BADLANG (unset)
    SHELL=/usr/bin/ksh

---

Follow-Ups from:

Martyn Pearce <martyn@inpharmatica.co.uk>

---

[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index][Thread Index][Top&Search][Original]

---