Comments on nothingmuch's perl blog: Sub::Call::Recur

You need to use 'goto' when you do that

2009-11-04T12:32:23.057+02:00

You need to use 'goto' when you do that

I like that your syntax is cleaner, but you can ju...

2009-11-04T07:10:19.456+02:00

I like that your syntax is cleaner, but you can just do the following:

sub fact {
my ( $n, $accum ) = @_;
...
} else {
@_ = ($n - 1, $n * $accum)
&fact;
}
}

The & sigil/operator/whatever, when used without trailing (), will start the subroutine without altering the stack - ie. the current @_ will be used.

You can use that same approach for optimising tail recursive calls as well.

A little benchmark to prove how useful this can be...

2009-11-02T13:23:16.087+02:00

A little benchmark to prove how useful this can be:

http://gist.github.com/224094