[SP-pm] RES: Dúvida com bloco if elsif else
Mura
murarm em terra.com.br
Sábado Novembro 25 06:50:22 PST 2006
Hummmm
Então assim o q eu quero é comparar
Se o valor em username é igual ao valor de $Char1 e assim por diante
No arquivo onde estão os valores está assim:
Char1 c1
Char2 c2
Char3 c3
Char4 c4
Char5 c5
Char6 c6
Char7 c7
Char8 c8
Char9 c9
E o código do programa assim:
my $Char1;
my $Char2;
my $Char3;
my $Char4;
my $Char5;
my $Char6;
my $Char7;
my $Char8;
my $Char9;
$Char1 = $::config{Char1};
$Char2 = $::config{Char2};
$Char3 = $::config{Char3};
$Char4 = $::config{Char4};
$Char5 = $::config{Char5};
$Char6 = $::config{Char6};
$Char7 = $::config{Char7};
$Char8 = $::config{Char8};
$Char9 = $::config{Char9};
if ($::config{username} = $Char1) {
main::configModify('username', $Char2, 1)
}
elsif ($::config{username} = $Char2) {
main::configModify('username', $Char3, 1)
}
elsif ($::config{username} = $Char3) {
main::configModify('username', $Char4, 1)
}
elsif ($::config{username} = $Char4) {
main::configModify('username', $Char5, 1)
}
elsif ($::config{username} = $Char5) {
main::configModify('username', $Char6, 1)
}
elsif ($::config{username} = $Char6) {
main::configModify('username', $Char7, 1)
}
elsif ($::config{username} = $Char7) {
main::configModify('username', $Char8, 1)
}
elsif ($::config{username} = $Char8) {
main::configModify('username', $Char9, 1)
}
else {
Commands::run("quit");
}
Esta rotina é executada de tempos em tempos e vai mudando os valores em
config{username} até atingir o 9º valor.
Está rodando e na primeira vez efetua a mudança para do username para c2,
daí para frente não muda mais e fica eternamente rodando hehehe.
Grato,
Mura
_____
De: saopaulo-pm-bounces+murarm=terra.com.br em pm.org
[mailto:saopaulo-pm-bounces+murarm=terra.com.br em pm.org] Em nome de Wendel
Scardua
Enviada em: sábado, 25 de novembro de 2006 12:02
Para: saopaulo-pm em mail.pm.org
Assunto: Re: [SP-pm] Dúvida com bloco if elsif else
On 11/25/06, Mura <murarm em terra.com.br> wrote:
Bom dia pessoal,
Eu não estou conseguindo usar os blocos if elsif else
Vejam parte do meu código
if ($::config{username} = $Char1) {
main::configModify('username', $Char2, 1)
}
Alerta vermelho!
Você não está testando se "$::config{username}" é igual a $Char1 (aliás,
porque um username teria um caractere só ?) .
Você está dizendo: "$::config{username} recebe $Char1" - e se o valor de
$Char1 for "verdadeiro" ele entra no if.
Se alguém pude me dar uma luz fico grato.
Se seu problema não era só esse bug, talvez seja o caso de você nos dar uma
luz :-)
[]s++
Wendel
"Não ajustar o auto-ajuste" - http://wendel.scardua.net/
"Puzzles do Wendel" - http://wendel.scardua.net/puzzle/puzzle.pl
_____
E-mail classificado pelo Identificador de Spam Inteligente.
Para alterar a categoria classificada, visite o Terra
<http://mail.terra.com.br/protected_email/imail/imail.cgi?+_u=murarm&_l=1,11
64463364.617472.22468.curepipe.hst.terra.com.br,8103,Des15,Des15> Mail
_____
Esta mensagem foi verificada pelo E-mail Protegido Terra
<http://mail.terra.com.br/> .
Scan engine: McAfee VirusScan / Atualizado em 24/11/2006 / Versão:
4.4.00/4904
Proteja o seu e-mail Terra: http://mail.terra.com.br/
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: http://mail.pm.org/pipermail/saopaulo-pm/attachments/20061125/9dbf37e9/attachment-0001.html
Mais detalhes sobre a lista de discussão SaoPaulo-pm