"Andy Bach" <[EMAIL PROTECTED]> schrieb im Newsbeitrag
[EMAIL PROTECTED]">news:[EMAIL PROTECTED]...
| and checking on perl's results found it sort of in the middle.
| http://www.bagley.org/~doug/shootout/lang/perl/
Nevermind my other mail. I did not read the full explanation of the test -
recursion required.
Sorry for bothering you with yet another unneeded piece of email!
Steffen
--
@n=(544290696690,305106661574,116357),$b=16,@c=' ,JPacehklnorstu'=~
/./g;for$n(@n){map{$h=int$n/$b**$_;$n-=$b**$_*$h;$c[@c]=$h}c(0..9);
push@p,map{$c[$_]}@c[c($b..$#c)];$#c=$b-1}print@p;sub'c{reverse @_}
