[SP-pm] Boas Vindas ao Ricardo Bittencourt

[Pinguim Azul]

Essa versão aqui funciona na 5.8 e na 5.10, mas é maior:

echo 2012 | perl -npe 's;.;y$IVCXL91-I0$XLMCDXVIII$dfor$I.=4x$&%1859^7;eg;$_=$I'

(Eu não fiz nenhuma das duas, peguei numa apostila)

2010/7/19 Eduardo Verissimo <everissimo at gmail.com>:
> Não consigo encontrar de maneira alguma um substituto para $#. Culpa do
> Google, talvez, que não me retorna exatamente essa sequencia de caracteres.
> Alguém sabe como fazer?
>
> Em 19 de julho de 2010 19:47, Pinguim Azul <bluepenguin at gmail.com> escreveu:
>>
>> Funciona no perl 5.8, mas não funciona no 5.10:
>>
>> $ echo 2012 |perl -npe
>> 's!.!($#.=5x$&*8%29628)=~y$IVCXL4620-8$XLMCDIXV$d!eg'
>> MMXII
>>
>> $ perl -v
>>
>> This is perl, v5.8.8 built for i486-linux-gnu-thread-multi
>>
>>
>> 2010/7/19 Eduardo Verissimo <everissimo at gmail.com>:
>> > Em 19 de julho de 2010 17:04, Pinguim Azul <bluepenguin at gmail.com>
>> > escreveu:
>> >>
>> >> Eu já baixei algumas apostilas de Golf, até agora o exemplo mais legal
>> >> que achei foi esse conversor de inteiro pra número romano:
>> >>
>> >> s!.!($#.=5x$&*8%29628)=~y$IVCXL4620-8$XLMCDIXV$d!eg
>> >
>> > Olá, Pinguim Azul. :)
>> >
>> > Eu tentei usar este onliner, mas não consegui fazer funcionar.
>> > $# is no longer supported at romanos.pl line 5.
>> >
>> > Vocês conseguiram?
>> >
>> > Abraço!
>> >
>> > _______________________________________________
>> > SaoPaulo-pm mailing list
>> > SaoPaulo-pm at pm.org
>> > http://mail.pm.org/mailman/listinfo/saopaulo-pm
>> >
>>
>>
>>
>> --
>> Ricardo Bittencourt
>> http://www.ricbit.com
>> _______________________________________________
>> SaoPaulo-pm mailing list
>> SaoPaulo-pm at pm.org
>> http://mail.pm.org/mailman/listinfo/saopaulo-pm
>
>
> _______________________________________________
> SaoPaulo-pm mailing list
> SaoPaulo-pm at pm.org
> http://mail.pm.org/mailman/listinfo/saopaulo-pm
>



-- 
Ricardo Bittencourt
http://www.ricbit.com