I can't get it to work. I should have been more explicit in my original post. Here is my test code:
#!/vcm/home/bin/perl -w use strict; use warnings; print "Hello world line 7\n"; print "Hello world line 8\n"; print "Hello world line 9\n"; print "Hello world line 10\n"; print "Hello world line 11\n"; print "Hello world line 12\n"; print "Hello world line 13\n"; print "Hello world line 14\n"; print "Hello world line 15\n"; print "Hello world line 16\n"; print "Hello world line 17\n"; print "Hello world line 18\n"; print "Hello world line 19\n"; print "Hello world line 20\n"; $ perl -v This is perl 5, version 12, subversion 1 (v5.12.1) built for x86_64-li +nux
And here is the debugger interaction. The action gets set on line 10 with a 10 print "action print". Neither using A 10, which I try when after executing line 12, nor A *, which I try after executing line 14, turns off the action printing. It keeps printing, once per line.
$ perl -d foo.pl Loading DB routines from perl5db.pl version 1.33 Editor support available. Enter h or `h h' for help, or `man perldebug' for more help. main::(foo.pl:7): print "Hello world line 7\n"; DB<1> a 9 print "action print\n"; + DB<2> n + Hello world line 7 main::(foo.pl:8): print "Hello world line 8\n"; DB<2> n + Hello world line 8 main::(foo.pl:9): print "Hello world line 9\n"; action print DB<2> n + Hello world line 9 main::(foo.pl:10): print "Hello world line 10\n"; action print DB<2> n + Hello world line 10 main::(foo.pl:11): print "Hello world line 11\n"; action print DB<2> n + Hello world line 11 main::(foo.pl:12): print "Hello world line 12\n"; action print DB<2> n + Hello world line 12 main::(foo.pl:13): print "Hello world line 13\n"; action print DB<2> A 10 + DB<3> n + Hello world line 13 main::(foo.pl:14): print "Hello world line 14\n"; action print DB<3> n + Hello world line 14 main::(foo.pl:15): print "Hello world line 15\n"; action print DB<3> A * + Deleting all actions... DB<4> n + Hello world line 15 main::(foo.pl:16): print "Hello world line 16\n"; action print DB<4> n + Hello world line 16 main::(foo.pl:17): print "Hello world line 17\n"; action print DB<4> n + Hello world line 17 main::(foo.pl:18): print "Hello world line 18\n"; action print
In reply to Re^2: action in debugger - how to turn off
by lcuff
in thread action in debugger - how to turn off
by lcuff
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |