Beefy Boxes and Bandwidth Generously Provided by pair Networks Bob
laziness, impatience, and hubris
 
PerlMonks  

Re^3: Deep recursion problem

by ikegami (Pope)
on Feb 11, 2013 at 23:02 UTC ( #1018259=note: print w/ replies, xml ) Need Help??


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

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.


Comment on Re^3: Deep recursion problem
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1018259]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (12)
As of 2014-04-21 16:37 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (497 votes), past polls