[Rio-pm] Combinação
Aureliano Guedes
guedes_1000 em hotmail.com
Sexta Março 23 07:34:23 PDT 2012
nessa linha
&re($_[0], $_[1], $_[2] + 1);
você define que são ate 3 caracteres??
ps: não foi so essa linha que eu não entendi.
From: guedes_1000 em hotmail.com
To: rio-pm em pm.org
Date: Fri, 23 Mar 2012 14:27:30 +0000
Subject: Re: [Rio-pm] Combinação
a logica binaria sim, mas da forma que vc colocou não tah mudando o quinto bit, dai quando se trata de letras não tah acontecendo a mudança de minusculo pra maiusculo,
ja esse outro script, não entendi absolutamente nada.
From: juniiior182 em gmail.com
Date: Fri, 23 Mar 2012 11:10:31 -0300
To: rio-pm em pm.org
Subject: Re: [Rio-pm] Combinação
Hi.
Acp, você conseguiu entender o script que postei lá?
Tá que eu não fiz ele pra ficar bonito e ser entendido e sim pra resolver o mini challenge, mas no caso:
use strict;
use warnings;
sub re {
if($_[2] != length($_[0])) {
my $ch = (split(//, $_[0]))[$_[2]];
for((lc($ch), uc($ch))) {
$_[1]->[$_[2]] = $_;
&re($_[0], $_[1], $_[2] + 1);
}
return;
}
print join(q(), @{$_[1]}), "\n";
}
re('ola', [], 0);
Ou conseguiu utilizar a lógica binária pra fazer o mapeamento e mudar os cases?
Por exemplo:
:~$ perl -E 'printf("%b\n", $_) for 0 .. 10'
000 = ola
001 = olA
010 = oLa
011 = oLA
100 = Ola
101 = OlA
E por aí vai...
[]'s
Em 23 de março de 2012 10:45, Aureliano Guedes <guedes_1000 em hotmail.com> escreveu:
Boma dia, monges.
Estou tentando fazer uma função que faça a combinação de cases sem usar o Set::CrossProduct.
Exemplo, tenho [A-F] e [1-6], e uma string com 6 caracteres (_ _ _ _ _ _), ou seja 6 posições
na primeira posição pode ser 1 ou A, na segunda 2 ou B ... na ultima 6 ou B, dai
quero que a saida seja todas as combinações possiveis, oou seja, todas as possibilidades da string.
Ja estou tentando a 2 dias, mas nada vem em mente.
Caso eu tenha me expressado mal (como o de costume), eu tento explicar melhor.
Aguardando alguma ajuda, desde ja obrigado.
_______________________________________________
Rio-pm mailing list
Rio-pm em pm.org
http://mail.pm.org/mailman/listinfo/rio-pm
--
Junior Moraes (fvox)
Perl Developer
http://www.unsecurity.com.br/
_______________________________________________
Rio-pm mailing list
Rio-pm em pm.org
http://mail.pm.org/mailman/listinfo/rio-pm
_______________________________________________
Rio-pm mailing list
Rio-pm em pm.org
http://mail.pm.org/mailman/listinfo/rio-pm
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/rio-pm/attachments/20120323/8b1c1fbd/attachment.html>
Mais detalhes sobre a lista de discussão Rio-pm