This is the revision history for scary factorial in <freenode.net:##NULL>

factoid_idsubjectcopulapredicateauthornamespace
3412 scary factorial is An example of a tail-recursive factorial function in perl is: sub fac { _fac(my $a = $_[0], my $b = $_[0] - 1) } sub _fac { return $_[0] unless $_[1] > 1; $_[0] *= $_[1]; $_[1]--; goto &_fac };' perlbot <*:##NULL>