Boa Tarde galera
 
  Obrigado a todos pela ajuda um outro amigo da lista me enviou tambem uma solução que funcionou legal.
Aproveitando existe alguma forma  de se gerar uma pagina dinamica que contenha imagens. por exemplo seu usar o
  print "Content-type: text/html\n\n"; no inicio da imprerssão da pagina as figuras (gif e jpg, etc)não são carregadas. Existe alguma maneira de se trasmitir as figuras junto com o html na resposta ao Brouser?
 
                                      Um abraço a todos
 
 
                               kid
 
 
-----Mensagem original-----
De: PlaY_bacK <[EMAIL PROTECTED]>
Para: [EMAIL PROTECTED] <[EMAIL PROTECTED]>
Data: Quinta-feira, 2 de Dezembro de 1999 23:30
Assunto: Re: [perl] Senhas - Resposta!


open (DB, "<$passfile") || &open_error($passfile);
$found = 0;

LINE: while (<DB>)
        {
        (/^#/)      and next LINE;
        (/^\s*$/)   and next LINE;
        chomp;     
        @data = split(/\|/,$_);
        if ($data[campo_da_senha] eq $FORM{'entrada_form'})
                {
                        $found = 1;
                }
                if ($found)
                {
                        last LINE;
                }
        }

        if ($found)
                {
                        print "senha certa";
                }
                else
                {
                        print "senha errada";
                }


E isso ai ! ;)


At 00:55 30/11/99 -0200, you wrote:
Ola Galera

 Estou tentando fazer um script simples de senha que so possui uma entrada e checa se existe o valor digitado num bco de dados, porem como estou começando estou levando um coro na seguinte parte do codigo

open (SENHAS, "$passfile") || &open_error($passfile);
@lines = <SENHAS>;
close (SENHAS);
foreach $line (@lines)


if ($FORM{'entrada_form'} eq $line) {

 print "senha certa";
exit;

}
print "senha errada";
exit;

o bco abre direito porem  no IF mesmo digitando uma senha correta o programa passa direto e informa senha  errada, acho que deve ser alguma coisa com o IF.

  Se algum tiver alguma ideia ficarei grato.


              um abraço a todos
                                                            Kid

Responder a