sim, mas como disse o Fernando, acho melhor continuar no outro tópico ;-), que especifica [golf]<br><br><div class="gmail_quote">2008/7/3 Gabriel Vieira <<a href="mailto:gabriel.vieira@gmail.com">gabriel.vieira@gmail.com</a>>:<br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">Estão recebendo?<br>
<div><div></div><div class="Wj3C7c"><br>
On Thu, Jul 3, 2008 at 12:34 PM, Gabriel Vieira<br>
<<a href="mailto:gabriel.vieira@gmail.com">gabriel.vieira@gmail.com</a>> wrote:<br>
> -1 :P<br>
><br>
> perl -E'@a=@ARGV;@a%2&&(@a=($i=1,@a));for$r(1..$#a){say$/,$r,"a<br>
> Rodada:$/$/";$y=3-($x=(!$_&$r|$_&1)+1),printf"%$x\$-15sx%$y\$15s\n",@a[$_,-$_-1]for$i..$#a/2;@a[1..$#a]=@a[2..$#a,1]}'<br>
> A B C D E<br>
><br>
> 2008/7/2 Fernando Oliveira <<a href="mailto:fernandocorrea@gmail.com">fernandocorrea@gmail.com</a>>:<br>
>> perl -E'@a=@ARGV;@a%2&&(@a=($i=1,@a));for$r(1..$#a){say$/,$r,"a<br>
>> Rodada:",$/x2;$y=3-($x=(!$_&$r|$_&1)+1),printf"%$x\$-15sx%$y\$15s\n",@a[$_,-$_-1]for$i..$#a/2;@a[1..$#a]=@a[2..$#a,1]}'<br>
>> A B C D E<br>
>><br>
>> 2008/7/2 Fernando Oliveira <<a href="mailto:fernandocorrea@gmail.com">fernandocorrea@gmail.com</a>>:<br>
>>><br>
>>> Mentira! desconsiderem esse último código!<br>
>>><br>
>>> 2008/7/2 Fernando Oliveira <<a href="mailto:fernandocorrea@gmail.com">fernandocorrea@gmail.com</a>>:<br>
>>>><br>
>>>> -2!<br>
>>>><br>
>>>> perl -E'@a=@ARGV;@a%2&&($i=1)&&unshift@a,0;for(1..$#a){say$/,$_,"a<br>
>>>> Rodada:",$/x2;@b=(-$_-1,$_),printf"%-15sx%15s$/",@a[$_||$i||$_%2?@b[1,0]:@b]for$i..$#a/2;@a[1..$#a]=@a[2..$#a,1]}'<br>
>>>> A B C D E<br>
>>>><br>
>>>> 2008/7/2 Fernando Oliveira <<a href="mailto:fernandocorrea@gmail.com">fernandocorrea@gmail.com</a>>:<br>
>>>>><br>
>>>>> perl -E, desculpem!<br>
>>>>><br>
>>>>> 2008/7/2 Fernando Oliveira <<a href="mailto:fernandocorrea@gmail.com">fernandocorrea@gmail.com</a>>:<br>
>>>>>><br>
>>>>>> -3<br>
>>>>>><br>
>>>>>> perl -E'@a=@ARGV;@a%2&&($i=1)&&unshift@a,a;for(1..$#a){say$/,$_,"a<br>
>>>>>> Rodada:",$/x2;@b=(-$_-1,$_),printf"%-15sx%15s$/",@a[$_%2?@b:$_||$i?@b[1,0]:@b]for$i..$#a/2;@a[1..$#a]=@a[2..$#a,1]}'<br>
>>>>>> A B C D E<br>
>>>>>><br>
>>>>>> 2008/7/2 Fernando Oliveira <<a href="mailto:fernandocorrea@gmail.com">fernandocorrea@gmail.com</a>>:<br>
>>>>>>><br>
>>>>>>> Pois é... será q esse eu ganho sem disputa?.. :(<br>
>>>>>>><br>
>>>>>>> 2008/7/2 Eden Cardim <<a href="mailto:edencardim@gmail.com">edencardim@gmail.com</a>>:<br>
>>>>>>>><br>
>>>>>>>> 2008/7/2 Fernando Oliveira <<a href="mailto:fernandocorrea@gmail.com">fernandocorrea@gmail.com</a>>:<br>
>>>>>>>> > perl<br>
>>>>>>>> > -e'@a=@ARGV;unshift@a,""if@a%2&&($i=1);for(1..$#a){print$/,$_,"a<br>
>>>>>>>> ><br>
>>>>>>>> > Rodada:",$/x3;@b=(-$_-1,$_),printf"%-15sx%15s$/",@a[$_%2?@b:$_||$i?@b[1,0]:@b]for$i..$#a/2;@a[1..$#a]=@a[2..$#a,1]}'<br>
>>>>>>>> > A B C D E<br>
>>>>>>>><br>
>>>>>>>> Nossa, os golfes mais interessantes só aparecem quando estamos<br>
>>>>>>>> atolados de trabalho :/<br>
>>>>>>>><br>
>>>>>>>> --<br>
>>>>>>>> <a href="http://edenc.vox.com" target="_blank">edenc.vox.com</a><br>
>>>>>>>> _______________________________________________<br>
>>>>>>>> Rio-pm mailing list<br>
>>>>>>>> <a href="mailto:Rio-pm@pm.org">Rio-pm@pm.org</a><br>
>>>>>>>> <a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a><br>
>>>>>>><br>
>>>>>>><br>
>>>>>>><br>
>>>>>>> --<br>
>>>>>>> Just another Perl Hacker,<br>
>>>>>>> Fernando (SmokeMachine)<br>
>>>>>>> <a href="http://perl-e.org" target="_blank">http://perl-e.org</a><br>
>>>>>><br>
>>>>>><br>
>>>>>> --<br>
>>>>>> Just another Perl Hacker,<br>
>>>>>> Fernando (SmokeMachine)<br>
>>>>>> <a href="http://perl-e.org" target="_blank">http://perl-e.org</a><br>
>>>>><br>
>>>>><br>
>>>>> --<br>
>>>>> Just another Perl Hacker,<br>
>>>>> Fernando (SmokeMachine)<br>
>>>>> <a href="http://perl-e.org" target="_blank">http://perl-e.org</a><br>
>>>><br>
>>>><br>
>>>> --<br>
>>>> Just another Perl Hacker,<br>
>>>> Fernando (SmokeMachine)<br>
>>>> <a href="http://perl-e.org" target="_blank">http://perl-e.org</a><br>
>>><br>
>>><br>
>>> --<br>
>>> Just another Perl Hacker,<br>
>>> Fernando (SmokeMachine)<br>
>>> <a href="http://perl-e.org" target="_blank">http://perl-e.org</a><br>
>><br>
>><br>
>> --<br>
>> Just another Perl Hacker,<br>
>> Fernando (SmokeMachine)<br>
>> <a href="http://perl-e.org" target="_blank">http://perl-e.org</a><br>
>> _______________________________________________<br>
>> Rio-pm mailing list<br>
>> <a href="mailto:Rio-pm@pm.org">Rio-pm@pm.org</a><br>
>> <a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a><br>
>><br>
><br>
><br>
><br>
> --<br>
> Gabriel Vieira<br>
><br>
<br>
<br>
<br>
--<br>
Gabriel Vieira<br>
_______________________________________________<br>
Rio-pm mailing list<br>
<a href="mailto:Rio-pm@pm.org">Rio-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/rio-pm" target="_blank">http://mail.pm.org/mailman/listinfo/rio-pm</a><br>
</div></div></blockquote></div><br>