Привет All
Подскажите плиз какие варианты рекурсивого вызова сабы кроме как по ссылке и через caller

• Рекурсивный вызов,PoizOn, 09:50 , 02-Июн-05
  • Рекурсивный вызов,retif, 11:16 , 02-Июн-05

>Привет All
>Подскажите плиз какие варианты рекурсивого вызова сабы кроме как по ссылке и
>через caller

$i=10;

    $i=getAndPrint($i);
    
    print $i,"\n";

sub getAndPrint {
    my $i=shift;
    $i=$i-1;
    print $i,"\n";
    getAndPrint($i) if($i);
    }

>$i=10;
>
>    $i=getAndPrint($i);
>
>    print $i,"\n";
>
>sub getAndPrint {
>    my $i=shift;
>    $i=$i-1;
>    print $i,"\n";
>    getAndPrint($i) if($i);
>    }

Увы не подходит - нужно сделать рекурсию без использования имени