[Rio-pm] golfe! palavras que vão e vem

Eden Cardim edencardim em gmail.com
Quinta Março 13 11:19:39 PDT 2008


On Thu, Mar 13, 2008 at 3:03 PM, Eden Cardim <edencardim em gmail.com> wrote:
> 2008/3/13 Gabriel Vieira <gabriel.vieira em gmail.com>:
>
> > perl -E '$_=pop;$`&&say$`while//g;say while chop,$_' Perl
>
>   perl -E'$_=pop;/(.(?{say$&}))+/;say while chop' Perl
>
>  Ainda não compilei 5.10 aqui mas vou arriscar essa conversão de perl 5.8 ;)

Opa, isso imprime um newline a mais. Só que mesmo consertando ainda é
menor que a do adriano :P

perl -E'$_=pop;/(.(?{say$&}))+/;say while chop,$_' Perl

50 caracteres

-- 
edenc.vox.com


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