[Rio-pm] [GOLF] Criando rodadas de um campeonato ERA: Golf: Criando rodadas de um campeonato

Eden Cardim edencardim em gmail.com
Quinta Julho 3 21:12:49 PDT 2008


2008/7/3 Fernando Oliveira <fernandocorrea em gmail.com>:
> -1:D
> perl -E'(@a=@ARGV)%2&&(@a=($i=1, em a));for$r(1..$#a){say"$/${r}a
> Rodada:$/$/";$y=3-($x=(!$_&$r|$_&1)+1),printf"%$x\$-15sx%$y\$15s\n", em a[$_,-$_-1]for$i..$#a/2;@a[1..$#a]=@a[2..$#a,1]}'
> A B C D E

-5 :D

perl -E'map{say"$/".++$r."a
Rodada:$/$/";$y=3-($x=(!$_&$r|$_&1)+1),printf"%$x\$-15sx%$y\$15s\n", em a[$_,-$_-1]for$i..$#a/2;@a[1..$#a]=@a[2..$#a,1]}(@a=@ARGV)%2?(@a=($i=1, em a)):@a'
A B C D E

-- 
edenc.vox.com


Mais detalhes sobre a lista de discussão Rio-pm