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

debugger dies at 'x' command #262

Open
jkeenan opened this issue Sep 2, 2020 · 1 comment
Open

debugger dies at 'x' command #262

jkeenan opened this issue Sep 2, 2020 · 1 comment
Labels
bug Something isn't working debugger

Comments

@jkeenan
Copy link
Collaborator

jkeenan commented Sep 2, 2020

Today, while working on #261, I had occasion to run the Perl (7) debugger. It died at the x command.

$ ./perl -Ilib -d Porting/sync-with-cpan ExtUtils::Install

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

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

Maintainers::(Porting/sync-with-cpan:144):
144:	$| = 1;
  DB<1> c 322
Maintainers::(Porting/sync-with-cpan:322):
322:	if (defined $tarball) {
  DB<2> x $tarball
Died at lib/perl5db.pl line 6391.
 at lib/perl5db.pl line 6391.
	DB::dumpit(GLOB(0x5621e73333c0), ARRAY(0x5621e836bc78)) called at lib/perl5db.pl line 767
	DB::eval called at lib/perl5db.pl line 3138
	DB::DB called at Porting/sync-with-cpan line 322
Debugged program terminated.  Use q to quit or R to restart,
use o inhibit_exit to avoid stopping after program termination,
h q, h R or h o to get additional info.

ISTR seeing this problem before. #14 ? #193 ?

Thank you very much.
Jim Keenan

@jkeenan jkeenan added bug Something isn't working debugger labels Sep 2, 2020
@jkeenan
Copy link
Collaborator Author

jkeenan commented Sep 2, 2020

I should qualify that the debugger does not always die at the x command in Perl 7. Today I was able to issue the following command in a different context.

  DB<9> 
HTTP::Tiny::request(/home/jkeenan/testing/alpha-dev-02-strict/lib/perl7/7.0.0/HTTP/Tiny.pm:435):
435:	        $response = eval { $self->_request($method, $url, $args) };
  DB<9> x $response
0  undef
  DB<10> n
HTTP::Tiny::mirror(/home/jkeenan/testing/alpha-dev-02-strict/lib/perl7/7.0.0/HTTP/Tiny.pm:305):
305:	    close $fh
306:	        or _croak(qq/Error: Caught error closing temporary file $tempfile: $!\n/);
  DB<10> x $response
0  HASH(0x560ea90da5c0)
   'content' => 'IO::Socket::SSL 1.42 must be installed for https support
Net::SSLeay 1.49 must be installed for https support
'
   'headers' => HASH(0x560ea90668a8)
      'content-length' => 110
      'content-type' => 'text/plain'
   'reason' => 'Internal Exception'
   'status' => 599
   'success' => ''
   'url' => 'https://cpan.metacpan.org/authors/id/B/BI/BINGOS/ExtUtils-Install-2.16.tar.gz'

I don't as yet have any insight into what's different in the two situations.

Thank you very much.
Jim Keenan

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
bug Something isn't working debugger
Projects
None yet
Development

No branches or pull requests

1 participant