search

Perl / perl5

🐪 The Perl programming language
https://dev.perl.org/perl5/
Other
1.96k stars 556 forks source link

perl -de 1 hangs, no DB<1> prompt -9 $$to clear] #5229

Open p5pRT opened 22 years ago

p5pRT commented 22 years ago

Migrated from rt.perl.org#8809 (status was 'stalled')

Searchable as RT8809$

p5pRT commented 22 years ago

From Richard.Foley@t-online.de

Jim Cromie wrote​:

I think your perl5db.pl patch is in\, you may want to see this. thx.

I'm a bit confused.

cant ^C\, ^Z\, or kill -15 it\, must kill -9 it from another window

I can control-c or control-d and they both kill the program.

$> dperl -de 1

Loading DB routines from perl5db.pl version 1.17 Editor support available.

Enter h or `h h' for help\, or `man perldebug' for more help.

main​::(-e​:1)​: 1 Killed $>

I don't follow you?

$ perl573 -de 1

Loading DB routines from perl5db.pl version 1.17 Editor support available.

Enter h or `h h' for help\, or `man perldebug' for more help.

main​::(-e​:1)​: 1   DB\<1> l 1==> 1

I don't see the difference\, except that mine offers a prompt ?-)

-- Ciao Richard Foley Ciao - shorter than AufWiederSehen!

p5pRT commented 22 years ago

From @tamias

On Thu\, Mar 07\, 2002 at 04​:56​:20PM +0100\, Richard Foley wrote​:

Jim Cromie wrote​:

I think your perl5db.pl patch is in\, you may want to see this. thx.

I'm a bit confused.

cant ^C\, ^Z\, or kill -15 it\, must kill -9 it from another window

I can control-c or control-d and they both kill the program.

$> dperl -de 1

Loading DB routines from perl5db.pl version 1.17 Editor support available.

Enter h or `h h' for help\, or `man perldebug' for more help.

main​::(-e​:1)​: 1 Killed $>

I don't follow you?

$ perl573 -de 1

Loading DB routines from perl5db.pl version 1.17 Editor support available.

Enter h or `h h' for help\, or `man perldebug' for more help.

main​::(-e​:1)​: 1 DB\<1> l 1==> 1

I don't see the difference\, except that mine offers a prompt ?-)

I believe that's the point of his report. As explained in the subject heading\, the debugger hangs\, he doesn't get a prompt\, and he has to kill -9 it from another terminal.

Ronald

p5pRT commented 22 years ago

From [Unknown Contact. See original ticket]

Ronald J Kimball wrote​:

cant ^C\, ^Z\, or kill -15 it\, must kill -9 it from another window

\ I don't see the difference\, except that mine offers a prompt ?-)

I believe that's the point of his report. As explained in the subject heading\, the debugger hangs\, he doesn't get a prompt\, and he has to kill -9 it from another terminal.

Hmmm - sounds omninous\, huh?

On a positive note\, at least we've got a bugid against it now :-)

And at least you know it works on my system.

-- Ciao Richard Foley Ciao - shorter than AufWiederSehen!

p5pRT commented 22 years ago

From [Unknown Contact. See original ticket]

perl573-V

p5pRT commented 22 years ago

From [Unknown Contact. See original ticket]

Richard Foley wrote​:

Ronald J Kimball wrote​:

cant ^C\, ^Z\, or kill -15 it\, must kill -9 it from another window

\

I don't see the difference\, except that mine offers a prompt ?-)

I believe that's the point of his report. As explained in the subject heading\, the debugger hangs\, he doesn't get a prompt\, and he has to kill -9 it from another terminal.

yes.

Hmmm - sounds omninous\, huh?

On a positive note\, at least we've got a bugid against it now :-)

mea culpa - a little gun-shy i guess. im sorry - esp now having seen the side effects; confusion & extra messages.

ok - heres what perlbug would have told you\, had I done it right. (i did try - never got an ack)

[jimc@​harpo jimc]$ dperl -V Summary of my perl5 (revision 5.0 version 7 subversion 3) configuration​:   Platform​:   osname=linux\, osvers=2.4.17-0.16\, archname=i686-linux   uname='linux harpo.jimc.earth 2.4.17-0.16 #1 sun feb 10 13​:33​:41 est 2002 i686 unknown '   config_args='-Dusedevel -des'   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=define   Compiler​:   cc='cc'\, ccflags ='-fno-strict-aliasing -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -I/usr/include/gdbm'\,   optimize='-O2'\,   cppflags='-fno-strict-aliasing -I/usr/local/include -I/usr/include/gdbm'   ccversion=''\, gccversion='2.96 20000731 (Red Hat Linux 7.1 2.96-98)'\, gccosandvers=''   intsize=4\, longsize=4\, ptrsize=4\, doublesize=8\, byteorder=1234   d_longlong=define\, longlongsize=8\, d_longdbl=define\, longdblsize=12   ivtype='long'\, ivsize=4\, nvtype='double'\, nvsize=8\, Off_t='off_t'\, lseeksize=8   alignbytes=4\, prototype=define   Linker and Libraries​:   ld='cc'\, ldflags =' -L/usr/local/lib'   libpth=/usr/local/lib /lib /usr/lib   libs=-lnsl -lgdbm -ldb -ldl -lm -lc -lcrypt -lutil   perllibs=-lnsl -ldl -lm -lc -lcrypt -lutil   libc=/lib/libc-2.2.4.so\, so=so\, useshrplib=false\, libperl=libperl.a   Dynamic Linking​:   dlsrc=dl_dlopen.xs\, dlext=so\, d_dlsymun=undef\, ccdlflags='-rdynamic'   cccdlflags='-fpic'\, lddlflags='-shared -L/usr/local/lib'

Characteristics of this binary (from libperl)​:   Compile-time options​: USE_LARGE_FILES   Built under linux   Compiled at Mar 5 2002 12​:10​:46   @​INC​:   /usr/local/lib/perl5/5.7.3/i686-linux   /usr/local/lib/perl5/5.7.3   /usr/local/lib/perl5/site_perl/5.7.3/i686-linux   /usr/local/lib/perl5/site_perl/5.7.3   /usr/local/lib/perl5/site_perl/5.7.2/i686-linux   /usr/local/lib/perl5/site_perl/5.7.2   /usr/local/lib/perl5/site_perl/5.6.1/i686-linux   /usr/local/lib/perl5/site_perl/5.6.1   /usr/local/lib/perl5/site_perl   .

its a -des build on Red Hat 7.2. only thing unusual is its a beta-rawhide kernel

and *just* in case there were bad tarballs out there --

[jimc@​harpo jimc]$ ll perl-5.7.3.tar.gz -rw------- 1 jimc jimc 9096782 Mar 5 12​:04 perl-5.7.3.tar.gz

[jimc@​harpo jimc]$ sum perl-5.7.3.tar.gz 07933 8884

[jimc@​harpo jimc]$ cksum perl-5.7.3.tar.gz 4159620471 9096782 perl-5.7.3.tar.gz

[jimc@​harpo jimc]$ /usr/sbin/lsof |grep dperl dperl 2036 jimc cwd DIR 3\,3 8192 261967 /home/jimc dperl 2036 jimc rtd DIR 3\,3 4096 2 / dperl 2036 jimc txt REG 3\,3 886150 54051 /usr/local/bin/perl5.7.3 dperl 2036 jimc mem REG 3\,3 494250 48830 /lib/ld-2.2.4.so dperl 2036 jimc mem REG 3\,3 370 422668 /usr/lib/locale/en_US/LC_IDENTIFICATION dperl 2036 jimc mem REG 3\,3 28 70328 /usr/lib/locale/en_US/LC_MEASUREMENT dperl 2036 jimc mem REG 3\,3 64 244073 /usr/lib/locale/en_US/LC_TELEPHONE dperl 2036 jimc mem REG 3\,3 160 248502 /usr/lib/locale/en_US/LC_ADDRESS dperl 2036 jimc mem REG 3\,3 82 248501 /usr/lib/locale/en_US/LC_NAME dperl 2036 jimc mem REG 3\,3 39 97651 /usr/lib/locale/en_US/LC_PAPER dperl 2036 jimc mem REG 3\,3 57 520317 /usr/lib/locale/en_US/LC_MESSAGES/SYS_LC_MESSAGES dperl 2036 jimc mem REG 3\,3 291 65217 /usr/lib/locale/en_US/LC_MONETARY dperl 2036 jimc mem REG 3\,3 21499 146417 /usr/lib/locale/en_US/LC_COLLATE dperl 2036 jimc mem REG 3\,3 2456 427496 /usr/lib/locale/en_US/LC_TIME dperl 2036 jimc mem REG 3\,3 59 97656 /usr/lib/locale/en_US/LC_NUMERIC dperl 2036 jimc mem REG 3\,3 11832 49118 /lib/libtermcap.so.2.0.8 dperl 2036 jimc mem REG 3\,3 436384 48879 /lib/libnsl-2.2.4.so dperl 2036 jimc mem REG 3\,3 65997 51853 /lib/libdl-2.2.4.so dperl 2036 jimc mem REG 3\,3 624962 394314 /lib/i686/libm-2.2.4.so dperl 2036 jimc mem REG 3\,3 5779542 390248 /lib/i686/libc-2.2.4.so dperl 2036 jimc mem REG 3\,3 85115 48872 /lib/libcrypt-2.2.4.so dperl 2036 jimc mem REG 3\,3 47872 48914 /lib/libutil-2.2.4.so dperl 2036 jimc mem REG 3\,3 173408 97661 /usr/lib/locale/en_US/LC_CTYPE dperl 2036 jimc mem REG 3\,3 115786 345170 /usr/local/lib/perl5/site_perl/5.6.1/i686-linux/auto/Term/ReadLine/Gnu/Gnu.so dperl 2036 jimc mem REG 3\,3 182185 325297 /usr/lib/libreadline.so.4.2 dperl 2036 jimc 0u CHR 136\,0 2 /dev/pts/0 dperl 2036 jimc 1u CHR 136\,0 2 /dev/pts/0 dperl 2036 jimc 2u CHR 136\,0 2 /dev/pts/0 dperl 2036 jimc 4u CHR 5\,0 69130 /dev/tty dperl 2036 jimc 5u CHR 5\,0 69130 /dev/tty [jimc@​harpo jimc]$

only thing that looks odd here is using 5.6.1's Term/ReadLine/Gnu/Gnu.so

anything else I can provide / do / try / hack-into-perl5db.pl\, etc ?

p5pRT commented 22 years ago

From [Unknown Contact. See original ticket]

Jim Cromie wrote​:

[jimc@​harpo jimc]$ dperl -V Summary of my perl5 (revision 5.0 version 7 subversion 3) configuration​: Platform​: osname=linux\, osvers=2.4.17-0.16\, archname=i686-linux uname='linux harpo.jimc.earth 2.4.17-0.16 #1 sun feb 10 13​:33​:41 est 2002 i686 unknown ' config_args='-Dusedevel -des'

I've attached mine here too\, on the off chance someone notices something other than the -de|-des and -Dprefix=/opt/perl/5.7.3 difference between them.

its a -des build on Red Hat 7.2. only thing unusual is its a beta-rawhide kernel

Gulp.

and *just* in case there were bad tarballs out there --

[jimc@​harpo jimc]$ ll perl-5.7.3.tar.gz -rw------- 1 jimc jimc 9096782 Mar 5 12​:04 perl-5.7.3.tar.gz

[jimc@​harpo jimc]$ sum perl-5.7.3.tar.gz 07933 8884

[jimc@​harpo jimc]$ cksum perl-5.7.3.tar.gz 4159620471 9096782 perl-5.7.3.tar.gz

Mine are identical​:

root@​blue​:/usr/local/src > ls -l perl-5.7.3.tar.gz -rw-r--r-- 1 root root 9096782 Mar 5 18​:45 perl-5.7.3.tar.gz root@​blue​:/usr/local/src > sum perl-5.7.3.tar.gz 07933 8884 root@​blue​:/usr/local/src > cksum perl-5.7.3.tar.gz 4159620471 9096782 perl-5.7.3.tar.gz

[jimc@​harpo jimc]$ /usr/sbin/lsof |grep dperl dperl 2036 jimc cwd DIR 3\,3 8192 261967 /home/jimc dperl 2036 jimc rtd DIR 3\,3 4096 2 / dperl 2036 jimc txt REG 3\,3 886150 54051 /usr/local/bin/perl5.7.3 dperl 2036 jimc mem REG 3\,3 494250 48830 /lib/ld-2.2.4.so dperl 2036 jimc mem REG 3\,3 370 422668 /usr/lib/locale/en_US/LC_IDENTIFICATION dperl 2036 jimc mem REG 3\,3 28 70328 /usr/lib/locale/en_US/LC_MEASUREMENT dperl 2036 jimc mem REG 3\,3 64 244073 /usr/lib/locale/en_US/LC_TELEPHONE dperl 2036 jimc mem REG 3\,3 160 248502 /usr/lib/locale/en_US/LC_ADDRESS dperl 2036 jimc mem REG 3\,3 82 248501 /usr/lib/locale/en_US/LC_NAME dperl 2036 jimc mem REG 3\,3 39 97651 /usr/lib/locale/en_US/LC_PAPER dperl 2036 jimc mem REG 3\,3 57 520317 /usr/lib/locale/en_US/LC_MESSAGES/SYS_LC_MESSAGES dperl 2036 jimc mem REG 3\,3 291 65217 /usr/lib/locale/en_US/LC_MONETARY dperl 2036 jimc mem REG 3\,3 21499 146417 /usr/lib/locale/en_US/LC_COLLATE dperl 2036 jimc mem REG 3\,3 2456 427496 /usr/lib/locale/en_US/LC_TIME dperl 2036 jimc mem REG 3\,3 59 97656 /usr/lib/locale/en_US/LC_NUMERIC dperl 2036 jimc mem REG 3\,3 11832 49118 /lib/libtermcap.so.2.0.8 dperl 2036 jimc mem REG 3\,3 436384 48879 /lib/libnsl-2.2.4.so dperl 2036 jimc mem REG 3\,3 65997 51853 /lib/libdl-2.2.4.so dperl 2036 jimc mem REG 3\,3 624962 394314 /lib/i686/libm-2.2.4.so dperl 2036 jimc mem REG 3\,3 5779542 390248 /lib/i686/libc-2.2.4.so dperl 2036 jimc mem REG 3\,3 85115 48872 /lib/libcrypt-2.2.4.so dperl 2036 jimc mem REG 3\,3 47872 48914 /lib/libutil-2.2.4.so dperl 2036 jimc mem REG 3\,3 173408 97661 /usr/lib/locale/en_US/LC_CTYPE dperl 2036 jimc mem REG 3\,3 115786 345170 /usr/local/lib/perl5/site_perl/5.6.1/i686-linux/auto/Term/ReadLine/Gnu/Gnu.so dperl 2036 jimc mem REG 3\,3 182185 325297 /usr/lib/libreadline.so.4.2 dperl 2036 jimc 0u CHR 136\,0 2 /dev/pts/0 dperl 2036 jimc 1u CHR 136\,0 2 /dev/pts/0 dperl 2036 jimc 2u CHR 136\,0 2 /dev/pts/0 dperl 2036 jimc 4u CHR 5\,0 69130 /dev/tty dperl 2036 jimc 5u CHR 5\,0 69130 /dev/tty [jimc@​harpo jimc]$

only thing that looks odd here is using 5.6.1's Term/ReadLine/Gnu/Gnu.so

anything else I can provide / do / try / hack-into-perl5db.pl\, etc ?

Here's my lsof output\, no sign of a 5.6.1 anywhere. Your 5.6.1 Gnu.so does look a bit suspicious coming from a fresh installation\, (to my untutored eye).

lsof | grep perl573 perl573 5203 root cwd DIR 3\,3 8192 98423 /usr/local/src/perl-5.7.3 perl573 5203 root rtd DIR 3\,3 4096 2 / perl573 5203 root txt REG 3\,3 955575 1906961 /opt/perl/5.7.3/bin/perl5.7.3 perl573 5203 root mem REG 3\,3 342535 277494 /lib/ld-2.1.3.so perl573 5203 root mem REG 3\,3 44 2363583 /usr/share/locale/en_US/LC_MESSAGES/SYS_LC_MESSAGES perl573 5203 root mem REG 3\,3 93 2296939 /usr/share/locale/en_US/LC_MONETARY perl573 5203 root mem REG 3\,3 508 2296941 /usr/share/locale/en_US/LC_TIME perl573 5203 root mem REG 3\,3 27 2296940 /usr/share/locale/en_US/LC_NUMERIC perl573 5203 root mem REG 3\,3 30408 1321074 /usr/lib/gconv/ISO8859-1.so perl573 5203 root mem REG 3\,3 369801 277501 /lib/libnsl.so.1 perl573 5203 root mem REG 3\,3 71846 277499 /lib/libdl.so.2 perl573 5203 root mem REG 3\,3 525421 277500 /lib/libm.so.6 perl573 5203 root mem REG 3\,3 4070406 277495 /lib/libc.so.6 perl573 5203 root mem REG 3\,3 61180 277496 /lib/libcrypt.so.1 perl573 5203 root mem REG 3\,3 44729 277508 /lib/libutil.so.1 perl573 5203 root mem REG 3\,3 87756 2296731 /usr/share/locale/en_US/LC_CTYPE perl573 5203 root 0u CHR 136\,7 9 /dev/pts/7 perl573 5203 root 1u CHR 136\,7 9 /dev/pts/7 perl573 5203 root 2u CHR 136\,7 9 /dev/pts/7 perl573 5203 root 3r REG 3\,3 17255 391819 /opt/perl/5.7.3/lib/5.7.3/Term/Cap.pm perl573 5203 root 4u CHR 5\,0 2379651 /dev/tty perl573 5203 root 5u CHR 5\,0 2379651 /dev/tty

My build command (as I recall) was something like the following​:

sh Configure -de -Dusedevel -Dprefix=/opt/perl/5.7.3

Looking into this further... (Term​::ReadLine.pm)

my ($which) = exists $ENV{PERL_RL} ? split /\s+/\, $ENV{PERL_RL} : undef; if ($which) {   if ($which =~ /\bgnu\b/i){   eval "use Term​::ReadLine​::Gnu;";   } elsif ($which =~ /\bperl\b/i) {   eval "use Term​::ReadLine​::Perl;";   } else {   eval "use Term​::ReadLine​::$which;";   } } elsif (defined $which and $which ne '') { # Defined but false   # Do nothing fancy } else {   eval "use Term​::ReadLine​::Gnu; 1" or eval "use Term​::ReadLine​::Perl; 1"; } PERL_RL is not set\, so we end up at the last line above. I got sort of fed up at this point\, so I stuck the old faithful print statements in to see if that might help​:

} else {   # eval "use Term​::ReadLine​::Gnu; 1" or eval "use Term​::ReadLine​::Perl; 1";   print "here\n";   eval "use Term​::ReadLine​::Gnu; 1"   or   eval "use Term​::ReadLine​::Perl; 1"   or   eval 'print "nothing done\n"'; }

richard@​blue​:/opt/perl/5.7.3/lib/5.7.3/Term > perl573 -de 0

Loading DB routines from perl5db.pl version 1.17 Editor support available.

Enter h or `h h' for help\, or `man perldebug' for more help.

main​::(-e​:1)​: 0 here nothing done   DB\<1>

I don't know if this is helpful\, but Jim\, perhaps you could try installing the latest version of ReadLine/Gnu.pm\, (seeing as it doesn't appear to be there by default)\, and see if that makes any difference?

-- Ciao Richard Foley Ciao - shorter than AufWiederSehen!

p5pRT commented 22 years ago

From [Unknown Contact. See original ticket]

perl573-V

p5pRT commented 22 years ago

From [Unknown Contact. See original ticket]

Jim Cromie wrote​:

only thing that looks odd here is using 5.6.1's Term/ReadLine/Gnu/Gnu.so

Did you get any further with this?

Did you try installing into a 'clean directory'?

And/or removing Gnu.pm?

-- Ciao Richard Foley Ciao - shorter than AufWiederSehen!

p5pRT commented 13 years ago

@chorny - Status changed from 'open' to 'stalled'