[Cascavel-pm] Decifrem pra mim, please
Nelson Ferraz
nferraz em gmail.com
Quarta Setembro 6 10:25:57 PDT 2006
Iberê Oliveira Kuntz se Souza wrote:
> Estava eu navegando pelo google(como de costume), quando encontrei essa
> expressao:
>
> $_="krJhruaesrltre c a cnP,ohet";$_.=$1,print$2while s/(..)(.)//;
Você pode começar melhorando o espaçamento do código:
$_ = "krJhruaesrltre c a cnP,ohet";
$_ .= $1, print $2 while s/(..)(.)//;
Depois você pode "desinverter" o while:
$_ = "krJhruaesrltre c a cnP,ohet";
while ( s/(..)(.)// ) {
$_ .= $1;
print $2;
}
Entendeu? :D
--
Nelson Corrêa de Toledo Ferraz
Segula Technologies (www.segula.fr)
Free Software Foundation Associate Member #3203
Sociedade Perl do Brasil (www.perl.org.br)
Rede Livre de Compartilhamento de Cultura Digital
Mais detalhes sobre a lista de discussão Cascavel-pm