Vamos dizer que você tem um site , cuja informação é reservada apenas para certas pessoas , e você não quer que qualquer um ter acesso . Uma maneira de impedi-los de entrar na área restrita é usar a autenticação de formulários . Isso normalmente envolve a criação de uma página de login , onde os usuários devem digitar uma senha para acesso . Este artigo irá demonstrar como proteger uma página Web segredo aninhada dentro de um programa CGI escrito em Perl. Outras linguagens do lado do servidor pode ser usado para realizar essa tarefa , como ASP.NET ou C, mas Perl é o preferido aqui por sua flexibilidade e relativa facilidade. Você vai precisar e conhecimento intermediário de Perl e conhecimento dos servidores e FTP. Coisas que você precisa
editor de texto
arquivo senha
Show Mais instruções
autenticação de formulários
1
Criar uma página de senha de login no editor de texto . Isso é feito em HTML que chama um script CGI quando o botão for pressionado. Um exemplo de script HTML para fazer isso é a seguinte:
Autenticação Autenticação exigida
< /html>
2
Criar um arquivo de senha em seu editor de texto que inclui os nomes de usuário e senhas das pessoas que têm a autenticação para entrar o site. As informações contidas no arquivo abaixo foi delimitado com tags XML personalizados. Você pode delimitar com o que você gosta, eu aconteço encontrar delimitadores XML muito pragmática . Salve o arquivo como " pwds.txt . " Mike Smith 123abc John Smith 456abc < nomear > Mary Smith 789abc
3 Criar o script CGI. O seguinte script Perl CGI leva a entrada do usuário e verifica -lo contra a informação no arquivo pwds.txt . Se a senha estiver correta, ele cumprimenta o usuário pelo nome e , em seguida, abre a informação secreta . Se a senha não for encontrado, uma mensagem de erro é impressa. " . Pwd_in.cgi !" Salve o seguinte script como # /usr /bin /perl- wprint " Content-type : text /html \\ n \\ n";
usar CGI;
$ q = new CGI; $ pwd = $ q- > param (' pwd '); $ cgi = new CGI;
abrir ( PCD , " while ( ) {
if ( / (*) <\\ /name> <\\ /pw > /é ) { $ name {$ 1} = $ 1; $ pw {$ 1} = $ 2; @ p_words = $ pw {$ 1} ;} (* ).
foreach ( $ p @ p_words ) {
if ($ p eq "$ pwd ") { $ error = "";
print "
< ; ! title> a Página secreta <\\ /title> <\\ /head> Hey $ name {$ 1} , Ainda bem que você poderia fazê-lo
Aqui é o informação secreta
<\\ /body> "; }}
} print $ erro;
4
Faça o upload dos arquivos . Carregar o arquivo HTML para a pasta HTML e os outros dois arquivos para seu cgi- bin.
5
Use chmod com o arquivo cgi . Você pode precisar de dar permissões para usuários de fora para acessar este arquivo . Para conceder permissão, no unix prompt, digite: > $ " chmod 755 pwd_cgi "
6
Execute o programa . Abra o arquivo HTML e digite uma senha de autêntico. Você vai ter uma página que recebe o nome de que a senha está associada com, bem como uma frase que diz: "Aqui é a informação em segredo. " Digite uma senha inválida ou sem senha, e você receberá uma mensagem de erro .
