perldb

Set breakpoint from .perldb init file

梦想的初衷 提交于 2021-01-27 23:21:33
问题 I am experimenting with the .perldb rc file and trying to set a breakpoint. Here is a small sample script that I use for testing ( p.pl ): use feature qw(say); use strict; use warnings; say "Line 5"; say "Line 6"; say "Line 7"; Then, I created the following .perldb file in the current directory: parse_options("NonStop=1"); sub afterinit { push @DB::typeahead, "b 7" } (Note that this file should not have write permission by other than yourself (i.e. : chmod 644 .perldb ) or else the debugger