Perl: ошибка отладки интерпретатора?

Question

У меня проблема в Perl, которая, я считаю, не из моего кода. У меня есть эта подпрограмма:

sub foo 
{ 
    my $depth = $_[0]; 
    my $input = $_[1]; 

    my $result = mymodule::do_calc($input); 
    if ($result) { foo($depth+1,$result); } 

    print "mark $depth\n"; 
} 

Программа работает отлично, как есть. Однако, если я прокомментирую линию печати, программа переходит в бесконечный цикл.

Если я поставил точку останова перед вызовом foo, я вижу, что $ depth принимает значение хеш-ссылки. С линией печати на месте это не так.

Кто-нибудь знает, куда идти отсюда? Я предполагаю, что я запускаю какую-то ошибку интерпретатора?

Answer 1

Существует связь между $ input и $ depth в другом месте кода.