If you cut and pasted this code you have a typo in start_angel which may be the problem as start_angle will be undefined.
Deep recursion means that that a sub is recursing more than one hundered times. The code in question is:
412: sub level_angle # (angle) 413: { 414: my $a = shift; 415: return level_angle($a-360) if ( $a > 180 ); 416: return level_angle($a+360) if ( $a <= -180 ); 417: return $a; 418: }
The only way that I can see that this sub could recurse >100 times (and implicate line 415) is if $a > 100 * 360. If $a is undef it will just get returned. You could trace back to see why this should be so but I expect fixing the typo may fix it.
cheers
tachyon
s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print
In reply to Re: Deep recursion on subroutine ?!?
by tachyon
in thread Deep recursion on subroutine ?!?
by k2
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |