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

"make test" fails #923

Closed
p5pRT opened this issue Dec 8, 1999 · 5 comments
Closed

"make test" fails #923

p5pRT opened this issue Dec 8, 1999 · 5 comments

Comments

@p5pRT
Copy link

p5pRT commented Dec 8, 1999

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

Searchable as RT1866$

@p5pRT
Copy link
Author

p5pRT commented Dec 8, 1999

From Chris.Beere@cwcom.co.uk


Start of test.log


(hilda)# cat test.log
  AutoSplitting perl library
./miniperl -Ilib -e 'use AutoSplit; \
autosplit_lib_modules(@​ARGV)' lib/*.pm lib/*/*.pm
  Making DynaLoader (static)
make[1]​: Entering directory `/users2/perl/perl5.005_03/ext/DynaLoader'
make[1]​: Leaving directory `/users2/perl/perl5.005_03/ext/DynaLoader'
make[1]​: Entering directory `/users2/perl/perl5.005_03/ext/DynaLoader'
make[1]​: Leaving directory `/users2/perl/perl5.005_03/ext/DynaLoader'

  Making utilities
make[1]​: Entering directory `/users2/perl/perl5.005_03/utils'
make[1]​: Nothing to be done for `all'.
make[1]​: Leaving directory `/users2/perl/perl5.005_03/utils'
  Making Errno (nonxs)
make[1]​: Entering directory `/users2/perl/perl5.005_03/ext/Errno'
make[1]​: Leaving directory `/users2/perl/perl5.005_03/ext/Errno'
make[1]​: Entering directory `/users2/perl/perl5.005_03/ext/Errno'
make[1]​: Leaving directory `/users2/perl/perl5.005_03/ext/Errno'
cd t && (rm -f perl; /bin/ln -s ../perl perl)
cd t && ./perl TEST </dev/tty
base/cond..........ok
base/if............ok
base/lex...........ok
base/pat...........ok
base/rs............ok
base/term..........ok
comp/cmdopt........ok
comp/colon.........ok
comp/cpp...........FAILED at test 1
comp/decl..........ok
comp/multiline.....ok
comp/package.......ok
comp/proto.........ok
comp/redef.........ok
comp/require.......ok
comp/script........ok
comp/term..........FAILED at test 13
comp/use...........ok
cmd/elsif..........ok
cmd/for............ok
cmd/mod............ok
cmd/subval.........ok
cmd/switch.........ok
cmd/while..........ok
io/argv............ok
io/dup.............ok
io/fs..............ok
io/inplace.........ok
io/iprefix.........ok
io/pipe............ok
io/print...........ok
io/read............ok
io/tell............ok
op/append..........ok
op/arith...........ok
op/array...........FAILED at test 31
op/assignwarn......ok
op/auto............ok
op/avhv............ok
op/bop.............ok
op/chop............ok
op/closure.........Undefined subroutine &main​::inner_sub called at - line
44.
Undefined subroutine &main​::inner_sub called at - line 40.
Undefined subroutine &main​::inner_sub called at - line 53.
Undefined subroutine &main​::inner_sub called at - line 49.
Undefined subroutine &main​::inner_sub called at - line 53.
FAILED at test 64
op/cmp.............ok
op/cond............ok
op/context.........ok
op/defins..........ok
op/delete..........ok
op/die.............ok
op/die_exit........ok
op/do..............ok
op/each............ok
op/eval............ok
op/exec............ok
op/exp.............ok
op/flip............ok
op/fork............ok
op/glob............ok
op/goto............ok
op/goto_xs.........FAILED at test 1
op/grep............ok
op/groups..........FAILED at test 1
op/gv..............ok
op/hashwarn........ok
op/inc.............ok
op/index...........ok
op/int.............ok
op/join............ok
op/list............ok
op/local...........ok
op/magic............/show-shebang​: print​: not found
FAILED at test 23
op/method..........ok
op/misc............PROG​:
($k, $s) = qw(x 0);
@​{$h{$k}} = qw(1 2 4);
for (@​{$h{$k}}) { $s += $_; delete $h{$k} if ($_ == 2) }
print "bogus\n" unless $s == 7;
EXPECTED​:
GOT​:
bogus
FAILED at test 40
op/mkdir...........ok
op/my..............ok
op/nothread........ok
op/oct.............ok
op/ord.............ok
op/pack............FAILED at test 10
op/pat.............FAILED at test 54
op/pos.............ok
op/push............ok
op/quotemeta.......ok
op/rand............FAILED at test 1
op/range...........FAILED at test 4
op/read............ok
op/readdir.........ok
op/recurse.........FAILED at test 8
op/ref.............ok
op/regexp..........ok
op/regexp_noamp....ok
op/repeat..........ok
op/runlevel........PROG​:
package TEST;

sub TIEARRAY {
  return bless [qw(foo fee fie foe)], $_[0];
}
sub FETCH {
  my ($s,$i) = @​_;
  if ($i) {
  goto bbb;
  }
bbb​:
  return $s->[$i];
}

package main;
tie my @​bar, 'TEST';
print join('|', @​bar[0..3]), "\n";
EXPECTED​:
foo|fee|fie|foe
GOT​:
FAILED at test 19
op/sleep...........ok
op/sort............ok
op/splice..........FAILED at test 4
op/split...........ok
op/sprintf.........ok
op/stat............ok
op/study...........ok
op/subst...........FAILED at test 6
op/substr..........ok
op/sysio...........ok
op/taint...........FAILED at test 30
op/tie.............ok
op/tiearray........ok
op/tiehandle.......ok
op/time............ok
op/tr..............ok
op/undef...........ok
op/universal.......ok
op/unshift.........ok
op/vec.............ok
op/wantarray.......ok
op/write...........ok
pragma/constant....FAILED at test 2
pragma/locale......FAILED at test 1
pragma/overload....FAILED at test 2
pragma/strict......ok
pragma/subs........ok
pragma/warning.....ok
lib/abbrev.........ok
lib/anydbm.........Can't locate Fcntl.pm in @​INC (@​INC contains​: ../lib) at
lib/
anydbm.t line 11.
BEGIN failed--compilation aborted at lib/anydbm.t line 11.
FAILED at test 0
lib/autoloader.....ok
lib/basename.......ok
lib/bigint.........FAILED at test 63
lib/bigintpm.......FAILED at test 64
lib/cgi-form.......ok
lib/cgi-function...ok
lib/cgi-html.......ok
lib/cgi-request....ok
lib/checktree......ok
lib/complex........FAILED at test 13
lib/db-btree.......FAILED at test 1
lib/db-hash........FAILED at test 1
lib/db-recno.......FAILED at test 1
lib/dirhand........ok
lib/dosglob........ok
lib/dumper-ovl.....Can't locate Data/Dumper.pm in @​INC (@​INC contains​:
../lib) a
t lib/dumper-ovl.t line 8.
BEGIN failed--compilation aborted at lib/dumper-ovl.t line 8.
FAILED at test 0
lib/dumper.........Can't locate Data/Dumper.pm in @​INC (@​INC contains​:
../lib) a
t lib/dumper.t line 11.
BEGIN failed--compilation aborted at lib/dumper.t line 11.
FAILED at test 0
lib/english........ok
lib/env............ok
lib/errno..........ok
lib/fatal..........ok
lib/fields.........ok
lib/filecache......ok
lib/filecopy.......Can't locate IO/File.pm in @​INC (@​INC contains​: ../lib)
at li
b/filecopy.t line 50.
FAILED at test 6
lib/filefind.......ok
lib/filehand.......FAILED at test 1
lib/filepath.......ok
lib/filespec.......ok
lib/findbin........ok
lib/gdbm...........FAILED at test 1
lib/getopt.........ok
lib/h2ph...........FAILED at test 2
lib/hostname.......ok
lib/io_dup.........FAILED at test 1
lib/io_pipe........FAILED at test 1
lib/io_sel.........Can't locate IO/Select.pm in @​INC (@​INC contains​: ../lib)
at
lib/io_sel.t line 15.
BEGIN failed--compilation aborted at lib/io_sel.t line 15.
FAILED at test 0
lib/io_sock........FAILED at test 1
lib/io_taint.......FAILED at test 1
lib/io_tell........FAILED at test 1
lib/io_udp.........FAILED at test 1
lib/io_xs..........FAILED at test 1
lib/ipc_sysv.......Can't locate IPC/SysV.pm in @​INC (@​INC contains​: ../lib)
at l
ib/ipc_sysv.t line 21.
BEGIN failed--compilation aborted at lib/ipc_sysv.t line 21.
FAILED at test 0
lib/ndbm...........FAILED at test 1
lib/odbm...........FAILED at test 1
lib/opcode.........FAILED at test 1
lib/open2..........Can't locate IO/Handle.pm in @​INC (@​INC contains​: ../lib)
at
lib/open2.t line 19.
BEGIN failed--compilation aborted at lib/open2.t line 19.
FAILED at test 0
lib/open3..........Can't locate IO/Handle.pm in @​INC (@​INC contains​: ../lib)
at
lib/open3.t line 19.
BEGIN failed--compilation aborted at lib/open3.t line 19.
FAILED at test 0
lib/ops............FAILED at test 1
lib/parsewords.....ok
lib/ph.............ok
lib/posix..........FAILED at test 1
lib/safe1..........FAILED at test 1
lib/safe2..........FAILED at test 1
lib/sdbm...........FAILED at test 1
lib/searchdict.....ok
lib/selectsaver....ok
lib/socket.........FAILED at test 1
lib/soundex........ok
lib/symbol.........ok
lib/textfill.......ok
lib/texttabs.......ok
lib/textwrap.......ok
lib/thread.........FAILED at test 1
lib/tie-push.......FAILED at test 7
lib/tie-stdarray...FAILED at test 31
lib/tie-stdpush....ok
lib/timelocal......ok
lib/trig...........FAILED at test 5
Failed 57 test scripts out of 190, 70.00% okay.
  ### Since not all tests were successful, you may want to run some
  ### of them individually and examine any diagnostic messages they
  ### produce. See the INSTALL document's section on "make test".
  ### If you are testing the compiler, then ignore this message
  ### and run
  ### ./perl harness
  ### in the directory ./t.
u=2.38333 s=1.53333 cu=193.5 cs=24.3167 scripts=183 tests=6140
make​: *** [test] Error 1
(hilda)#
--------------------------------------------------------------------- End of
test.log


I also tried the suggested ./perl harness from the ./t directory​:-

(hilda)# cd t
(hilda)# ./perl harness
Can't locate IO/File.pm in @​INC (@​INC contains​: ../lib ../lib) at
../lib/FileHan
dle.pm line 9.
BEGIN failed--compilation aborted at ../lib/Test/Harness.pm line 7.
BEGIN failed--compilation aborted at harness line 13.
(hilda)#

Here is the output from myconfig,
Summary of my perl5 (5.0 patchlevel 5 subversion 3) configuration​:
  Platform​:
  osname=sysv, osvers=r3v8, archname=M68040-sysv
  uname='hilda hilda r3v8 991006 m68040 '
  hint=recommended, useposix=true, d_sigaction=undef
  usethreads=undef useperlio=undef d_sfio=undef
  Compiler​:
  cc='/usr/bin/gnucc', optimize='-O', gccversion=2.4.5
  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=12
  alignbytes=2, usemymalloc=y, prototype=define
  Linker and Libraries​:
  ld='ld', ldflags =' -L/usr/local/lib'
  libpth=/usr/local/lib /lib /usr/lib
  libs=-lnsl -lld -lm -lc -lcrypt -lbsd -lPW
  libc=/lib/libc.a, so=none, useshrplib=false, libperl=libperl.a
  Dynamic Linking​:
  dlsrc=dl_none.xs, dlext=none, d_dlsymun=undef, ccdlflags=''
  cccdlflags='', lddlflags=''

What do you think is wrong?

regards

Chris Beere

Phone​: +44 (0) 1923 435817
Fax​: +44 (0) 1923 435370
Email​: chris.beere@​cwcom.co.uk

@p5pRT
Copy link
Author

p5pRT commented Dec 8, 1999

From @doughera88

On Wed, 8 Dec 1999, Beere, Chris wrote​:

comp/cpp...........FAILED at test 1
comp/term..........FAILED at test 13
op/array...........FAILED at test 31
op/closure.........Undefined subroutine &main​::inner_sub called at - line 44.

[etc.]

Failed 57 test scripts out of 190, 70.00% okay.

Many of the later tests failed because you didn't build any extensions and
those tests rely on some extensions. Maybe they should have failed more
gracefully.

However, that's a separate issue from your main problem, which is that
even some basic tests failed.

Here is the output from myconfig,
Summary of my perl5 (5.0 patchlevel 5 subversion 3) configuration​:
Platform​:
osname=sysv, osvers=r3v8, archname=M68040-sysv
uname='hilda hilda r3v8 991006 m68040 '
Compiler​:
cc='/usr/bin/gnucc', optimize='-O', gccversion=2.4.5

I think I've seen a similar combo before with similarly poor results.
You seem to have a recent os (I'll guess the 9910006 in uname -a
is a date stamp of some sort) but a *very* old gcc. Are you *sure*
this is the appropriate gcc for your system and that nothing has been
upgraded since gcc-2.4.5 was built & installed?

My first inclination would be to try to fetch a more recent gcc. If you
absolutely can't do that, at least try turning off the optimization -O.

Hope this helps,

--
  Andy Dougherty doughera@​lafayette.edu
  Dept. of Physics
  Lafayette College, Easton PA 18042

@p5pRT
Copy link
Author

p5pRT commented Dec 9, 1999

From [Unknown Contact. See original ticket]

At 14​:58 +0000 1999-12-08, Beere, Chris wrote​:

Platform​:
osname=sysv, osvers=r3v8, archname=M68040-sysv
uname='hilda hilda r3v8 991006 m68040 '
hint=recommended, useposix=true, d_sigaction=undef
usethreads=undef useperlio=undef d_sfio=undef
Compiler​:
cc='/usr/bin/gnucc', optimize='-O', gccversion=2.4.5
....

What do you think is wrong?

Dunno. However, as Andy Dougherty has said, that's a very old gcc
you've got. Is there a newer version available for your system?
(Which may itself be very old, judging from the processor and OS
information -- I don't place as much faith in date-stamps as Andy)
The same applies for glibc, if that's what /usr/lib/libc.a really is.
If so, try updating and rebuilding perl from scratch with the newer
software.

Another possibility​: did any suspicious messages appear on the
console and/or in the syslog file while those tests are failing? If
your system is suffering from a shortage of some resource (memory,
file slots, processes ...) you may see bleats in these places, rather
than at the terminal running the tests. If there are any such
bleats, try running the tests when the system is less busy and/or
increasing the amount of the tight resource. (Which, though usually
possible, is regrettably difficult on many flavours of UNIX.)

Finally (for now), you can throw more light on a particular failing
tests by running them like this​:

cd /users2/perl/perl5.005_03/t
./TEST -v comp/cpp.t comp/term.t

If nothing we suggest does any good, use perlbug to send us the
verbose results of failing tests.

--
Dominic Dunlop

@p5pRT
Copy link
Author

p5pRT commented Jan 7, 2000

From [Unknown Contact. See original ticket]

Hello,
  I have downloaded perl5.005_003, unpacked it, ran "sh Configure
-Dcc=gnucc". I eventually go it to compile correctly once I got the list of
libraries and extensions correct.Libraries used​:-
-lgdbm -lm881

Extensions built are​:-
static_ext='B Data/Dumper Fcntl GDBM_File IO IPC/SysV Opcode attrs re'

When I ran 'make test' it failed the gdbm test. I ran it manually from the
./t directory with ./perl lib/gdbm.t and the result was​:-
(hilda​: root) bash 825​: ./perl lib/gdbm.t
1..20
ok 1
ok 2
Segmentation fault (core dumped)
(hilda​: root) bash 826​:

I ran it under the perl debugger​:-

(hilda​: root) bash 831​: ./perl -d lib/gdbm.t
Loading DB routines from perl5db.pl version 1.0402
Emacs support available.
Enter h or `h h' for help.
main​::(lib/gdbm.t​:16)​: print "1..20\n";
  DB<1> s
1..20
main​::(lib/gdbm.t​:18)​: unlink <Op.dbmx*>;
  DB<1> s
main​::(lib/gdbm.t​:20)​: umask(0);
  DB<1> s
main​::(lib/gdbm.t​:21)​: print (tie(%h,GDBM_File,'Op.dbmx', &GDBM_WRCREAT,
0640)
? "ok 1\n" : "not ok 1\n");
  DB<1> s
GDBM_File​::AUTOLOAD(../lib/GDBM_File.pm​:65)​:
65​: my($constname);
  DB<1> s
GDBM_File​::AUTOLOAD(../lib/GDBM_File.pm​:66)​:
66​: ($constname = $AUTOLOAD) =~ s/.*​:://;
  DB<1> s
GDBM_File​::AUTOLOAD(../lib/GDBM_File.pm​:67)​:
67​: my $val = constant($constname, @​_ ? $_[0] : 0);
  DB<1> s
GDBM_File​::AUTOLOAD(../lib/GDBM_File.pm​:68)​:
68​: if ($! != 0) {
  DB<1> s
GDBM_File​::AUTOLOAD(../lib/GDBM_File.pm​:77)​:
77​: eval "sub $AUTOLOAD { $val }";
  DB<1> s
GDBM_File​::AUTOLOAD(../lib/GDBM_File.pm​:78)​:
78​: goto &$AUTOLOAD;
  DB<1> s
GDBM_File​::GDBM_WRCREAT((eval 4)​:1)​:
1​:
  DB<1> s
ok 1
main​::(lib/gdbm.t​:23)​: $Dfile = "Op.dbmx.pag";
  DB<1> s
main​::(lib/gdbm.t​:24)​: if (! -e $Dfile) {
  DB<1> s
main​::(lib/gdbm.t​:25)​: ($Dfile) = <Op.dbmx*>;
  DB<1> s
main​::(lib/gdbm.t​:27)​: if ($^O eq 'amigaos' || $^O eq 'os2' || $^O eq
'MSWin32'
|| $^O eq 'dos') {
  DB<1> s
main​::(lib/gdbm.t​:31)​:
($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime
,$mtime,$ctime,
main​::(lib/gdbm.t​:32)​: $blksize,$blocks) = stat($Dfile);
  DB<1> s
main​::(lib/gdbm.t​:33)​: print (($mode & 0777) == 0640 ? "ok 2\n" : "not
ok 2
\n");
  DB<1> s
ok 2
main​::(lib/gdbm.t​:35)​: while (($key,$value) = each(%h)) {
  DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:97)​:
97​: return @​_ if ref $_[0];
  DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:98)​:
98​: my $error = join '', @​_;
  DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:99)​:
99​: my $mess = "";
  DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:100)​:
100​: my $i = 1 + $CarpLevel;
  DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:101)​:
101​: my ($pack,$file,$line,$sub,$hargs,$eval,$require);
  DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:102)​:
102​: my (@​a);
  DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:106)​:
106​: while (do { { package DB; @​a = caller($i++) } } ) {
  DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:106)​:
106​: while (do { { package DB; @​a = caller($i++) } } ) {
  DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:186)​:
186​: my $msg = \($mess || $error);
  DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:187)​:
187​: $$msg =~ tr/\0//d;
  DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:188)​:
188​: $$msg;
  DB<1> s
Signal SEGV​: No such file or directory
ABORT instruction (core dumped)
(hilda​: root) bash 832​:

I can't make head nor tail of this. I downloaded perl to learn it, and
trying to sort this out is a bit over my head.

Any ideas whats wrong?

The output of myconfig follows​:-

(hilda​: root) bash 828​: myconfig
Summary of my perl5 (5.0 patchlevel 5 subversion 3) configuration​:
  Platform​:
  osname=sysv, osvers=r3v8, archname=M68040-sysv
  uname='hilda hilda r3v8 991006 m68040 '
  hint=recommended, useposix=true, d_sigaction=undef
  usethreads=undef useperlio=undef d_sfio=undef
  Compiler​:
  cc='gnucc', optimize='-O', gccversion=2.8.1
  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=12
  alignbytes=2, usemymalloc=y, prototype=define
  Linker and Libraries​:
  ld='ld', ldflags =' -L/usr/local/lib'
  libpth=/usr/local/lib /lib /usr/lib
  libs=-lgdbm -lm881
  libc=/lib/libc.a, so=none, useshrplib=false, libperl=libperl.a
  Dynamic Linking​:
  dlsrc=dl_none.xs, dlext=none, d_dlsymun=undef, ccdlflags=''
  cccdlflags='', lddlflags=''

(hilda​: root) bash 829​:

regards

Chris Beere

Phone​: +44 (0) 1923 435817
Fax​: +44 (0) 1923 435370
Email​: chris.beere@​cwcom.co.uk

@p5pRT
Copy link
Author

p5pRT commented Jan 14, 2000

From [Unknown Contact. See original ticket]

Hello,
I have downloaded perl5.005_003, unpacked it, ran "sh Configure
-Dcc=gnucc". I eventually go it to compile correctly once I got the list
of libraries and extensions correct.Libraries used​:-
-lgdbm -lm881

Extensions built are​:-
static_ext='B Data/Dumper Fcntl GDBM_File IO IPC/SysV Opcode attrs re'

When I ran 'make test' it failed the gdbm test. I ran it manually from
the ./t directory with ./perl lib/gdbm.t and the result was​:-
(hilda​: root) bash 825​: ./perl lib/gdbm.t
1..20
ok 1
ok 2
Segmentation fault (core dumped)
(hilda​: root) bash 826​:

I ran it under the perl debugger​:-

(hilda​: root) bash 831​: ./perl -d lib/gdbm.t
Loading DB routines from perl5db.pl version 1.0402
Emacs support available.
Enter h or `h h' for help.
main​::(lib/gdbm.t​:16)​: print "1..20\n";
DB<1> s
1..20
main​::(lib/gdbm.t​:18)​: unlink <Op.dbmx*>;
DB<1> s
main​::(lib/gdbm.t​:20)​: umask(0);
DB<1> s
main​::(lib/gdbm.t​:21)​: print (tie(%h,GDBM_File,'Op.dbmx', &GDBM_WRCREAT,
0640)
? "ok 1\n" : "not ok 1\n");
DB<1> s
GDBM_File​::AUTOLOAD(../lib/GDBM_File.pm​:65)​:
65​: my($constname);
DB<1> s
GDBM_File​::AUTOLOAD(../lib/GDBM_File.pm​:66)​:
66​: ($constname = $AUTOLOAD) =~ s/.*​:://;
DB<1> s
GDBM_File​::AUTOLOAD(../lib/GDBM_File.pm​:67)​:
67​: my $val = constant($constname, @​_ ? $_[0] : 0);
DB<1> s
GDBM_File​::AUTOLOAD(../lib/GDBM_File.pm​:68)​:
68​: if ($! != 0) {
DB<1> s
GDBM_File​::AUTOLOAD(../lib/GDBM_File.pm​:77)​:
77​: eval "sub $AUTOLOAD { $val }";
DB<1> s
GDBM_File​::AUTOLOAD(../lib/GDBM_File.pm​:78)​:
78​: goto &$AUTOLOAD;
DB<1> s
GDBM_File​::GDBM_WRCREAT((eval 4)​:1)​:
1​:
DB<1> s
ok 1
main​::(lib/gdbm.t​:23)​: $Dfile = "Op.dbmx.pag";
DB<1> s
main​::(lib/gdbm.t​:24)​: if (! -e $Dfile) {
DB<1> s
main​::(lib/gdbm.t​:25)​: ($Dfile) = <Op.dbmx*>;
DB<1> s
main​::(lib/gdbm.t​:27)​: if ($^O eq 'amigaos' || $^O eq 'os2' || $^O eq
'MSWin32'
|| $^O eq 'dos') {
DB<1> s
main​::(lib/gdbm.t​:31)​:
($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime
,$mtime,$ctime,
main​::(lib/gdbm.t​:32)​: $blksize,$blocks) = stat($Dfile);
DB<1> s
main​::(lib/gdbm.t​:33)​: print (($mode & 0777) == 0640 ? "ok 2\n" :
"not ok 2
\n");
DB<1> s
ok 2
main​::(lib/gdbm.t​:35)​: while (($key,$value) = each(%h)) {
DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:97)​:
97​: return @​_ if ref $_[0];
DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:98)​:
98​: my $error = join '', @​_;
DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:99)​:
99​: my $mess = "";
DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:100)​:
100​: my $i = 1 + $CarpLevel;
DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:101)​:
101​: my ($pack,$file,$line,$sub,$hargs,$eval,$require);
DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:102)​:
102​: my (@​a);
DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:106)​:
106​: while (do { { package DB; @​a = caller($i++) } } ) {
DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:106)​:
106​: while (do { { package DB; @​a = caller($i++) } } ) {
DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:186)​:
186​: my $msg = \($mess || $error);
DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:187)​:
187​: $$msg =~ tr/\0//d;
DB<1> s
GDBM_File​::FIRSTKEY(../lib/Carp.pm​:188)​:
188​: $$msg;
DB<1> s
Signal SEGV​: No such file or directory
ABORT instruction (core dumped)
(hilda​: root) bash 832​:

I can't make head nor tail of this. I downloaded perl to learn it, and
trying to sort this out is a bit over my head.

Any ideas whats wrong?

The output of myconfig follows​:-

(hilda​: root) bash 828​: myconfig
Summary of my perl5 (5.0 patchlevel 5 subversion 3) configuration​:
Platform​:
osname=sysv, osvers=r3v8, archname=M68040-sysv
uname='hilda hilda r3v8 991006 m68040 '
hint=recommended, useposix=true, d_sigaction=undef
usethreads=undef useperlio=undef d_sfio=undef
Compiler​:
cc='gnucc', optimize='-O', gccversion=2.8.1
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=12
alignbytes=2, usemymalloc=y, prototype=define
Linker and Libraries​:
ld='ld', ldflags =' -L/usr/local/lib'
libpth=/usr/local/lib /lib /usr/lib
libs=-lgdbm -lm881
libc=/lib/libc.a, so=none, useshrplib=false, libperl=libperl.a
Dynamic Linking​:
dlsrc=dl_none.xs, dlext=none, d_dlsymun=undef, ccdlflags=''
cccdlflags='', lddlflags=''

(hilda​: root) bash 829​:

regards

Chris Beere

Phone​: +44 (0) 1923 435817
Fax​: +44 (0) 1923 435370
Email​: chris.beere@​cwcom.co.uk

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