Skip Menu |
Report information
Id: 1107
Status: resolved
Priority: 0/
Queue: perl5

Owner: Nobody
Requestors: lvirden [at] cas.org
Cc:
AdminCc:

Operating System: Solaris
PatchStatus: (no value)
Severity: fatal
Type: (no value)
Perl Version: (no value)
Fixed In: (no value)



Date: Thu, 29 Jul 1999 11:20:43 -0400 (EDT)
From: "Larry W. Virden" <lvirden [...] cas.org>
To: perlbug [...] perl.com
Subject: Not OK: perl 5.00558 on sun4-solaris 2.6 (UNINSTALLED)
----------------------------------------------------------------- [Please enter your report here] Sorry about that - I think this will be a bit better! pragma/warning......PROG: # op.c $ENV{PERL_DESTRUCT_LEVEL} = 0 unless $ENV{PERL_DESTRUCT_LEVEL} > 3; # known scalar leak use warning 'unsafe' ; my $a ; my @a = () ; my %a = () ; my $b = \@a ; my $c = \%a ; @a =~ /abc/ ; @a =~ s/a/b/ ; @a =~ tr/a/b/ ; @$b =~ /abc/ ; @$b =~ s/a/b/ ; @$b =~ tr/a/b/ ; %a =~ /abc/ ; %a =~ s/a/b/ ; %a =~ tr/a/b/ ; %$c =~ /abc/ ; %$c =~ s/a/b/ ; %$c =~ tr/a/b/ ; { no warning 'unsafe' ; my $a ; my @a = () ; my %a = () ; my $b = \@a ; my $c = \%a ; @a =~ /abc/ ; @a =~ s/a/b/ ; @a =~ tr/a/b/ ; @$b =~ /abc/ ; @$b =~ s/a/b/ ; @$b =~ tr/a/b/ ; %a =~ /abc/ ; %a =~ s/a/b/ ; %a =~ tr/a/b/ ; %$c =~ /abc/ ; %$c =~ s/a/b/ ; %$c =~ tr/a/b/ ; } EXPECTED: Applying pattern match to @array will act on scalar(@array) at - line 5. Applying substitution to @array will act on scalar(@array) at - line 6. Can't modify private array in substitution at - line 6, near "s/a/b/ ;" Applying character translation to @array will act on scalar(@array) at - line 7. Applying pattern match to @array will act on scalar(@array) at - line 8. Applying substitution to @array will act on scalar(@array) at - line 9. Applying character translation to @array will act on scalar(@array) at - line 10. Applying pattern match to %hash will act on scalar(%hash) at - line 11. Applying substitution to %hash will act on scalar(%hash) at - line 12. Applying character translation to %hash will act on scalar(%hash) at - line 13. Applying pattern match to %hash will act on scalar(%hash) at - line 14. Applying substitution to %hash will act on scalar(%hash) at - line 15. Applying character translation to %hash will act on scalar(%hash) at - line 16. BEGIN not safe after errors--compilation aborted at - line 18. GOT: Applying pattern match to @array will act on scalar(@array) at - line 5. Applying substitution to @array will act on scalar(@array) at - line 6. Can't modify private array in substitution at - line 6, near "s/a/b/ ;" Applying character translation to @array will act on scalar(@array) at - line 7. Applying pattern match to @array will act on scalar(@array) at - line 8. Applying substitution to @array will act on scalar(@array) at - line 9. Applying character translation to @array will act on scalar(@array) at - line 10. Applying pattern match to %hash will act on scalar(%hash) at - line 11. Applying substitution to %hash will act on scalar(%hash) at - line 12. Applying character translation to %hash will act on scalar(%hash) at - line 13. Applying pattern match to %hash will act on scalar(%hash) at - line 14. Applying substitution to %hash will act on scalar(%hash) at - line 15. Applying character translation to %hash will act on scalar(%hash) at - line 16. BEGIN not safe after errors--compilation aborted at - line 18. Scalars leaked: 1 FAILED at test 135 lib/dprof...........ld.so.1: ../perl: fatal: relocation error: file /vol/lwv26ldatae/lib/perl5/site_perl/5.005/sun4-solaris/auto/Devel/DProf/DProf.so: symbol perl_get_cv: referenced symbol not found FAILED at test 1 I then cd'd into the t directory and ran perl harness there as suggested by INSTALL. I got op/stat.............FAILED test 39 Failed 1/58 tests, 98.28% okay pragma/warning......ok lib/dprof...........ld.so.1: ../perl: fatal: relocation error: file /vol/lwv26ldatae/lib/perl5/site_perl/5.005/sun4-solaris/auto/Devel/DProf/DProf.so: symbol perl_get_cv: referenced symbol not found ld.so.1: ../perl: fatal: relocation error: file /vol/lwv26ldatae/lib/perl5/site_perl/5.005/sun4-solaris/auto/Devel/DProf/DProf.so: symbol perl_get_cv: referenced symbol not found ld.so.1: ../perl: fatal: relocation error: file /vol/lwv26ldatae/lib/perl5/site_perl/5.005/sun4-solaris/auto/Devel/DProf/DProf.so: symbol perl_get_cv: referenced symbol not found ld.so.1: ../perl: fatal: relocation error: file /vol/lwv26ldatae/lib/perl5/site_perl/5.005/sun4-solaris/auto/Devel/DProf/DProf.so: symbol perl_get_cv: referenced symbol not found ld.so.1: ../perl: fatal: relocation error: file /vol/lwv26ldatae/lib/perl5/site_perl/5.005/sun4-solaris/auto/Devel/DProf/DProf.so: symbol perl_get_cv: referenced symbol not found ld.so.1: ../perl: fatal: relocation error: file /vol/lwv26ldatae/lib/perl5/site_perl/5.005/sun4-solaris/auto/Devel/DProf/DProf.so: symbol perl_get_cv: referenced symbol not found FAILED tests 1-10, 12-18 Failed 17/18 tests, 5.56% okay When I ran op/stat.t directly I got: #4 :933261597: should != :933261599: [Please do not change anything below this line] ----------------------------------------------------------------- --- Site configuration information for perl 5.00558: Configured by lwv26 at Wed Jul 28 15:24:24 EDT 1999. Summary of my perl5 (revision 5.0 version 5 subversion 58) configuration: Platform: osname=solaris, osvers=2.6, archname=sun4-solaris uname='sunos lwv26awu 5.6 generic_105181-14 sun4u sparc sunw,ultra-5_10 ' config_args='-des' hint=previous, useposix=true, d_sigaction=define usethreads=undef useperlio=undef d_sfio=undef use64bits=undef usemultiplicity=undef Compiler: cc='cc', optimize='-O', gccversion= cppflags='-DDEBUGGING -I/projects/gnu/sparc-sun-solaris2.6/include -I/vol/lwv26ldatae/include -I/usr/ccs/include -I/usr/include' ccflags ='-DDEBUGGING -I/projects/gnu/sparc-sun-solaris2.6/include -I/vol/lwv26ldatae/include -I/usr/ccs/include -I/usr/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='cc', ldflags ='-L/projects/gnu/sparc-sun-solaris2.6/lib -L/vol/lwv26ldatae/lib -L/usr/ccs/lib -R/projects/gnu/sparc-sun-solaris2.6/lib:/vol/lwv26ldatae/lib:/usr/ccs/lib' libpth=/projects/gnu/sparc-sun-solaris2.6/lib /vol/lwv26ldatae/lib /usr/ccs/lib /usr/lib libs=-lsocket -lnsl -lgdbm -ldb -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='-R/projects/gnu/sparc-sun-solaris2.6/lib:/vol/lwv26ldatae/lib:/usr/ccs/lib -G -L/projects/gnu/sparc-sun-solaris2.6/lib -L/vol/lwv26ldatae/lib -L/usr/ccs/lib' Locally applied patches: --- @INC for perl 5.00558: lib /home/lwv26/lib/perl5/ /projects/sprs_lwv/lib/perl5/ /vol/lwv26ldatae/lib/perl5/5.005/sun4-solaris /vol/lwv26ldatae/lib/perl5/5.005 /vol/lwv26ldatae/lib/perl5/site_perl/5.005/sun4-solaris /vol/lwv26ldatae/lib/site_perl . --- Environment for perl 5.00558: HOME=/home/lwv26 LANG=C LANGUAGE (unset) LD_LIBRARY_PATH=/lprod/cas/lib:/usr/dt/lib:/usr/openwin/lib:/usr/lib LOGDIR (unset) PATH=/opt/SUNWspro/bin:/ldatae/bin:/projects/sprs_lwv/sol26/bin:/projects/sprs_lwv/sol26/bin/mime:/projects/sprs_lwv/sol2/bin:/projects/sprs_lwv/bin:/projects/sprs_lwv/bin/mime:/home/lwv26/bin/D.news:/usr/perl5/bin:/projects/gnu/sparc-sun-solaris2.6/bin:/usr/tcl80/pd/sun4/bin:/usr/tcl80/pd/bin:/usr/tcl80/sun4/bin:/usr/tcl80/bin:/projects/xopsrc/sun4/bin:/projects/xopsrc/bin:/usr/atria/bin:/projects/intranet/bin:/projects/clearcase/bin:/vol/tclsrcsol/TclPro1.2/solaris-sparc/bin:/ldata2/teTeX/bin/sparc-sun-solaris2.6:/usr/tcl81/sun4/bin:/usr/tcl81/bin:/ldata/bin:/home/lwv26/bin/D.aws:/home/lwv26/bin/sol2:/home/lwv26/bin/D.frontend:/home/lwv26/bin/D.ksh:/cas/test/bin/sun4:/projects/sprs_lwv/bin/sol2:/usr/java1.2/bin:/home/lwv26/bin/sun4:/lprod/cas/bin:/usr/local/bin:/usr/dt/bin:/usr/openwin/bin:/bin:/cas/bin/sun4:/cas/abin/sun4:/cas/X11/sun4/bin:/usr/ccs/bin:/uprod/bin:/usr/sbin:/cas/tools/bin/sun4:/cas/X11/sun4/tools/bin:/usr/ucb:/home/lwv26/bin:/cas/tools/pdbin/sun4:/home/l! wv26/bin/D.mistypes:/home/lwv26/bin/D.toys:/home/lwv26/bin/D.tools:/projects/npd/npdweb/bin-sol2 PERL5LIB=/home/lwv26/lib/perl5/:/projects/sprs_lwv/lib/perl5/: PERLDOC=-t PERLLIB=/home/lwv26/lib/perl:/projects/sprs_lwv/lib/perl: PERL_BADLANG (unset) SHELL=/bin/sh
Date: Thu, 29 Jul 1999 21:12:56 +0200
To: lvirden [...] cas.org
From: Dominic Dunlop <domo [...] vo.lu>
Subject: Re: [ID 19990729.004] Not OK: perl 5.00558 on sun4-solaris 2.6 (UNINSTALLED)
Cc: perl5-porters [...] perl.org
Download (untitled) / with headers
text/plain 696b
At 17:20 +0200 1999-07-29, Larry W. Virden wrote: Show quoted text
> pragma/warning......PROG: > # op.c > $ENV{PERL_DESTRUCT_LEVEL} = 0 unless $ENV{PERL_DESTRUCT_LEVEL} > 3; # >known scalar leak > use warning 'unsafe' ; > [...] > Applying pattern match to %hash will act on scalar(%hash) at - line 14. > Applying substitution to %hash will act on scalar(%hash) at - line 15. > Applying character translation to %hash will act on scalar(%hash) at - >line 16. > BEGIN not safe after errors--compilation aborted at - line 18. > Scalars leaked: 1
I see precisely the same under MachTen (after some tweaking involving getspent(), which I'll cover when I get around to posting a Not OK message). -- Dominic Dunlop


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

For issues related to this RT instance (aka "perlbug"), please contact perlbug-admin at perl.org