>I have recently used the caller function in a module I was writing.
>
>I think your problem is here:
>
>>13: my $i = 0;
>>14: while (my ($package, $filename, $line, $subroutine) = caller ($i)) {
>
>When you call caller with 0, it returns the curent subroutine. If you
>call it with 1 it will give the subroutine that called the current
>subroutine, with 2 the subroutine that called the suboutine that called
>the current subroutine, etc...
Peter Cline
Inet Developer
New York Times Digital
