Help for this page
sub obvious{ # (explained : count from zero until Z, return the current count if w +e found the position we are looking for) ... #23456789012345678901234567890123456789012345678901234567890 $n=pop;for(;$n ne((0..9),(A..Z))[$a];$a++){}"$a"||0; }
sub fun { # (explained : reduce the numbers to their base2 (binary) ... # same thing, but obfu # $n=ord(pop);$a=($n&(1<<(4+($n>>6)))-1)+($n>>6&&9); }
www.com | www.net | www.org
No recent polls found