Re^2: Deep recursion problem

[hexcoder]

in reply to Re: Deep recursion problem
in thread Deep recursion problem

As stated in perldiag, "this threshold can be changed from 100, by recompiling the perl binary, setting the C pre-processor macro PERL_SUB_DEPTH_WARN to the desired value."

Hmmm... there are two cases: with or without running the debugger. I assume you meant the case without the debugger.

With the debugger, one can set the threshold higher than 100 interactively prior to running the program, for example:

  DB<1> $DB::deep=1000

  DB<2> ...

This is now part of my debugger initialization file.

[ikegami]

Hmmm... there are two cases: with or without running the debugger. I assume you meant the case without the debugger.

No, I meant what I said. $DB::deep has no effect on the warning. Ever.

With the debugger, one can set the threshold higher than 100 interactively prior to running the program

That's not true.

>perl -dwe"$DB::deep = 1000; sub f { f($_[0]-1) if $_[0]; } f(150);"

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

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

main::(-e:1):   $DB::deep = 1000; sub f { f($_[0]-1) if $_[0]; } f(150
+);

  DB<1> r
Deep recursion on subroutine "main::f" at C:/Progs/perl5161-ap1601/lib
+/perl5db.pl line 3550.
 at C:/Progs/perl5161-ap1601/lib/perl5db.pl line 3550.
...

See the post to which you replied if you want to know what $DB::deep actually does.