Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

silent 'use strict' #865

Closed
p5pRT opened this issue Nov 18, 1999 · 1 comment
Closed

silent 'use strict' #865

p5pRT opened this issue Nov 18, 1999 · 1 comment

Comments

@p5pRT
Copy link

p5pRT commented Nov 18, 1999

Migrated from rt.perl.org#1795 (status was 'resolved')

Searchable as RT1795$

@p5pRT
Copy link
Author

p5pRT commented Nov 18, 1999

From dvl@de.uu.net

Hello,

Executing the following code (tested with 5.005_02/03 5004_05 and
5.005_57) line 6 bails with the following error​:

Can't use an undefined value as an ARRAY reference at x.pl line 6.

When i comment out line 6, line 8 yields no error nor a warning!

<perl>

use strict;
$^W = 1;

my $self = {};

print join (", ", @​{ $self->{lrxef} } ),"\n";

foreach (@​{ $self->{lrxef} }) {
  print ".";
}

print "\n";

</perl>

Regards,
Dirk

Perl Info


Site configuration information for perl 5.00502:

Configured by hm at Mon Nov 16 19:59:13 MET 1998.

Summary of my perl5 (5.0 patchlevel 5 subversion 2) configuration:
  Platform:
    osname=solaris, osvers=2.6, archname=sun4-solaris
    uname='sunos shusai 5.6 generic_105181-03 sun4u sparc sunw,ultra-5_10 '
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=undef useperlio=undef d_sfio=undef
  Compiler:
    cc='/usr/local/SUNWspro/bin/cc', optimize='-fast', gccversion=
    cppflags='-I/usr/local/include'
    ccflags ='-I/usr/local/include'
    stdchar='unsigned char', d_stdstdio=define, usevfork=false
    intsize=4, longsize=4, ptrsize=4, doublesize=8
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
    alignbytes=8, usemymalloc=y, prototype=define
  Linker and Libraries:
    ld='/usr/local/SUNWspro/bin/cc', ldflags =' -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib /usr/ccs/lib
    libs=-lsocket -lnsl -ldl -lm -lc -lcrypt
    libc=/lib/libc.so, so=so, useshrplib=false, libperl=libperl.a
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags=' '
    cccdlflags='-KPIC', lddlflags='-G -L/usr/local/lib'

Locally applied patches:
    


@INC for perl 5.00502:
    /users/opt/pkg/perl-5.005_02/lib/sun4-solaris
    /users/opt/pkg/perl-5.005_02/lib
    /users/opt/pkg/perl-5.005_02/lib/site_perl/5.005/sun4-solaris
    /users/opt/pkg/perl-5.005_02/lib/site_perl/5.005
    .


Environment for perl 5.00502:
    HOME=/home/dvl
    LANG (unset)
    LD_LIBRARY_PATH=/usr/local/rvplayer5.0:/usr/local/groff-1.11/lib:/usr/local/xpm/lib:/usr/openwin/lib:/usr/local/X11/lib
    LOGDIR (unset)
    PATH=/usr/local/ghostscript/bin:/usr/local/ssh-1.2.22/bin:/usr/local/xpm/bin:/usr/local/netscape-v45:/usr/local/groff-1.11/bin:/usr/local/xv/bin:/usr/openwin/demo:/users/opt/bin:/home/dvl/bin:/usr/openwin/bin:/users/opt/bin:/usr/bin:/usr/sbin:/usr/local/sbin:/sbin:/usr/local/bin:/usr/ccs/bin:/users/home/dvl/bin:/home/dvl/local/bin:/usr/local/X11/bin
    PERL_BADLANG (unset)
    PERL_READLINE_NOWARN=1
    SHELL=/usr/local/bin/bash

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Projects
None yet
Development

No branches or pull requests

1 participant