[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Slackit.org] Capitolo 17
From: |
Roberto Natella |
Subject: |
[Slackit.org] Capitolo 17 |
Date: |
Fri, 25 Jul 2003 10:37:33 +0200 |
User-agent: |
Mutt/1.4.1i |
Ciao,
visto che avevo tempo ho tradotto un altro capitolo del libro... perĂ² ho perso
l'indirizzo a cui inviare la traduzione, per cui qualcuno gentilmente mi indichi
la via :-)
Bye
--
@x=(84,273,(map{2**$_*73}0..2),map{8**$_*7}0..2);sub c{($a|$b)&pop}sub t{grep{$
_==($_[0]&$_)address@hidden f{map{for$g(0..8){return$b+=$g
if!c($g=2**$g)&&t($_+$g)}}$
b,$a;0while c$u=2**int rand 9;$b+=$u}sub p{while($o<7){$_="\n".":"x9;s/:::/$a&(
$m=$m<<1||1)?":X:":$b&$m?":O:":": :"/eg if$o++%2;print}$o=$m=0}p;sub
w{if(address@hidden){
p;last}}while(<>){next if!/([1-9])/||c$_=2**($1-1);w$a+=$_;w $a|$b^511?f:511;p}
- [Slackit.org] Capitolo 17,
Roberto Natella <=