develooper Front page | perl.perl5.porters | Postings from April 2003

[perl #21785] The magic of while (Patch 900) never got documented

Thread Previous | Thread Next
From:
perlbug-followup
Date:
April 1, 2003 07:11
Subject:
[perl #21785] The magic of while (Patch 900) never got documented
Message ID:
rt-21785-54438.11.3961742397346@bugs6.perl.org
# New Ticket Created by  kriegjcb@sunu991.rz.ruhr-uni-bochum.de 
# Please include the string:  [perl #21785]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt2/Ticket/Display.html?id=21785 >


This is a bug report for perl from kriegjcb@sunu991.rz.ruhr-uni-bochum.de,
generated with the help of perlbug 1.34 running under perl v5.8.0.


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

As perlmonks and the fifth German Perl workshop found out,
"while" has some special magic in handling a few operators.

While (sic) everyone knows that
  while(<>) {}

really means

  while(defined($_=<>)) {}

it never got documented that patch 900
also introduced similar behaviou?r for
"readdir", "glob" and "each".

One problem is where to document it (probably under "while"),
but the old thing is documented under "readline".

Another small problem for me is how "each" can ever return something defined
but false.

Jost

[Please do not change anything below this line]
-----------------------------------------------------------------
---
Flags:
    category=docs
    severity=low
---
Site configuration information for perl v5.8.0:

Configured by kriegjcb at Fri Jul 19 13:58:46 MSZ 2002.

Summary of my perl5 (revision 5.0 version 8 subversion 0) configuration:
  Platform:
    osname=solaris, osvers=2.8, archname=sun4-solaris
    uname='sunos sunu991 5.8 generic_108528-14 sun4u sparc '
    config_args='-de'
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=undef use5005threads=undef 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='gcc', ccflags ='-fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
    optimize='-O',
    cppflags='-fno-strict-aliasing -I/usr/local/include'
    ccversion='', gccversion='3.0', gccosandvers='solaris2.8'
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=4321
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
    alignbytes=8, prototype=define
  Linker and Libraries:
    ld='gcc', ldflags =' -L/usr/local/lib '
    libpth=/usr/local/lib /usr/lib /usr/ccs/lib
    libs=-lsocket -lnsl -lgdbm -ldb -ldl -lm -lc
    perllibs=-lsocket -lnsl -ldl -lm -lc
    libc=/lib/libc.so, so=so, useshrplib=false, libperl=libperl.a
    gnulibc_version=''
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags=' '
    cccdlflags='-fPIC', lddlflags='-G -L/usr/local/lib'

Locally applied patches:
    

---
@INC for perl v5.8.0:
    /usr/local/perl/lib/5.8.0/sun4-solaris
    /usr/local/perl/lib/5.8.0
    /usr/local/perl/lib/site_perl/5.8.0/sun4-solaris
    /usr/local/perl/lib/site_perl/5.8.0
    /usr/local/perl/lib/site_perl/5.6.1
    /usr/local/perl/lib/site_perl/5.6.0
    /usr/local/perl/lib/site_perl
    .

---
Environment for perl v5.8.0:
    HOME=/home/kriegjcb
    LANG=C
    LANGUAGE (unset)
    LD_LIBRARY_PATH=/usr/local/gnu/lib:/usr/local/gcc/lib:/opt/SUNWits/Graphics-sw/xil/lib:/usr/openwin/lib:/opt/SUNWits/Graphics-sw/xgl/lib:/usr/dt/lib:/usr/openwin/lib:/usr/local/lib:/usr/lib:/usr/ucblib
    LOGDIR (unset)
    PATH=/home/kriegjcb/bin.sun4:/usr/openwin/bin:/usr/local/net/bin:/usr/local/graphics/bin:/usr/local/perl/bin:/usr/local/gnu/bin:/usr/local/gcc/bin:/home/kriegjcb/bin/sun4/SunOS-5.8:/home/kriegjcb/bin/sun4:/home/kriegjcb/bin:/usr/local/bin:/usr/bin:/usr/sbin:/usr/lib/netsvc/yp:/usr/openwin/bin:/opt/SUNWspro/bin:/usr/dt/bin:/opt/SUNWmfwm/bin:/opt/SUNWguide/bin:/usr/ccs/bin:/usr/ucb:.:/usr/sbin
    PERL_BADLANG (unset)
    PERL_READLINE_NOWARN=1
    SHELL=/bin/bash


Thread Previous | Thread Next


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