Re^4: How can I print variable contents from the debugger non-interactively? (@DB::typeahead)

you can also send debugger commands from inside the debugged Perl program ...

(though I don't recommend hard-coding linenumbers there, use $DB::single=1 to set a breakpoint in place)

use strict;
use warnings;

push @DB::typeahead,
  'b 19 $y==3',
  '{ X y'
  if exists &DB::DB;


$|=1;

my $a;
our $y;


for (0..10) {
   print;
   $a++;
   $y++;
}
[download]

runs as

  DB<22> c
0123auto(-3)  DB<22> X y
$y = 3
auto(-2)  DB<23> b 19 $y==3
auto(-1)  DB<24> { X y
  DB<25> c
45678910auto(-1)  DB<25> X y
  DB<26>
[download]

Cheers Rolf
_{(addicted to the Perl Programming Language and ☆☆☆☆ :)

Je suis Charlie!}

Comment on Re^4: How can I print variable contents from the debugger non-interactively? (@DB::typeahead) Select or Download Code