<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=windows-874">
<META content="MSHTML 6.00.2900.2668" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT face=Arial size=2>Hello,</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2>I try to solve a problem by calling a function
like:</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2>my @kk = caller($zz);</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2>The $zz should be the outmost of the calling
stack.</FONT></DIV>
<DIV><FONT face=Arial size=2>Currently, I have to loop form $zz=0 to inf to
find the maximum $zz</FONT></DIV>
<DIV><FONT face=Arial size=2>that makes caller return not null data. I doubt
that perl</FONT></DIV>
<DIV><FONT face=Arial size=2>maintains some special varaiable for the maximum
value of "caller function"</FONT></DIV>
<DIV><FONT face=Arial size=2>or in other word, current
depth of calling stack.</FONT></DIV>
<DIV><FONT face=Arial size=2>Anybody know how to get it without keep calling the
caller function ?</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT> </DIV>
<DIV><FONT face=Arial size=2>-thanks</FONT></DIV>
<DIV><FONT face=Arial size=2>kem</FONT></DIV></BODY></HTML>