From @perhunter

i am getting a core dump when using Data​::Dumper. here is the standalone script
which causes this. it fails on both solaris 7 and linux 2.2

#!/usr/local/bin/perl -w

use Data​::Dumper ;

use constant BITS => 4 ;
use constant NODE_SIZE => 2 ** BITS ;
use constant NODE_INDEX => NODE_SIZE - 1 ;

$root_node = undef ;

tree_find( pack( 'H8', '12025678'), 20 ) ;

exit ;

sub tree_find {

  my( $ip, $mask_size ) = @​_ ;

  @​ip_parts = unpack 'C4', $ip ;

  $node_ref = \$root_node ;

  $bits_left = $mask_size ;

  while( $bits_left > 0 ) {

  print Dumper( $root_node ) ;
  $ip_part = shift @​ip_parts ;

printf "part %02x $ip_part\n", $ip_part ;

  $node = $$node_ref ;

  unless ( defined( $node ) ) {

  $node = new_node() ;

  $$node_ref = $node ;
  $node_ref = \$node->[$ip_part] ;

  next ;
  }
  }
  continue {
  $bits_left -= BITS ;
  $node_level++ ;
  }
}

sub new_node {

  my( @​node ) ;

  $#node = NODE_INDEX ;

  \@​node ;
}

Site configuration information for perl 5.00503:

Configured by uri at Mon Jul 26 15:07:36 EDT 1999.

Summary of my perl5 (5.0 patchlevel 5 subversion 3) configuration:
  Platform:
    osname=solaris, osvers=2.7, archname=sun4-solaris
    uname='sunos mail.sysarch.com 5.7 generic sun4u sparc '
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=undef useperlio=undef d_sfio=undef
  Compiler:
    cc='cc -B/usr/ccs/bin/ -B/usr/ccs/bin/', optimize='-O', gccversion=egcs-2.91.60 19981201 (egcs-1.1.1 release)
    cppflags='-I/usr/local/include'
    ccflags ='-I/usr/local/include'
    stdchar='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 -B/usr/ccs/bin/ -B/usr/ccs/bin/', 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='-fPIC', lddlflags='-G -L/usr/local/lib'

Locally applied patches:
    


@INC for perl 5.00503:
    /usr/local/lib/perl5/5.00503/sun4-solaris
    /usr/local/lib/perl5/5.00503
    /usr/local/lib/perl5/site_perl/5.005/sun4-solaris
    /usr/local/lib/perl5/site_perl/5.005
    .


Environment for perl 5.00503:
    HOME=/home/uri
    LANG (unset)
    LANGUAGE (unset)
    LD_LIBRARY_PATH=/usr/lib:/usr/ucblib:/usr/openwin/lib:/usr/local/lib
    LOGDIR (unset)
    PATH=/usr/local/bin:/usr/local/bin/tex:/usr/bin:/usr/ccs/bin:/usr/ucb:/usr/sbin::/usr/openwin/bin:/usr/openwin/demo
    PERL_BADLANG (unset)
    SHELL=/usr/local/bin/bash

From [Unknown Contact. See original ticket]

Uri Guttman writes​:

i am getting a core dump when using Data​::Dumper. here is the
standalone script which causes this. it fails on both solaris 7 and
linux 2.2

It coredumps for me with 5.00503, but not with 5.00557. It smells
like a fixed bug in the core (I'm running with the same version of
Data​::Dumper on each version of Perl), so one hopes it won't be
present in 5.00504.

Nat

From @ask

[RT_System - Thu Aug 5 17​:21​:29 1999]​:

Uri Guttman writes​:

i am getting a core dump when using Data​::Dumper. here is the
standalone script which causes this. it fails on both solaris 7 and
linux 2.2

It coredumps for me with 5.00503, but not with 5.00557. It smells
like a fixed bug in the core (I'm running with the same version of
Data​::Dumper on each version of Perl), so one hopes it won't be
present in 5.00504.

Seems like it's fixed. I'll close the ticket. Uri, please reopen it if it's still an issue with
more recent perls.

--
ask bjoern hansen, http​://askbjoernhansen.com/ !try; do();
Develooper LLC, http​://develooper.com/ $stuff->better;

@ask - Status changed from 'open' to 'resolved'