"Shinya Hayakawa" <[EMAIL PROTECTED]> schrieb... > I am interested in recursive programming in Perl. > There is a bit of code to determine whether a number > is even or odd. > That's fun, isn't it? [snip]
Well, modulo 2 is, that's for sure. 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 @_}