|
|
|
| Come impostare l'autenticazione Forms |
|
Diciamo che hai un sito web le cui informazioni sono riservate solo per alcuni individui , e non si vuole che qualsiasi ottenendo l'accesso . Un modo per impedire loro di entrare nell'area sterile è quello di utilizzare l'autenticazione moduli . Questo in genere implica la creazione di una pagina di accesso in cui gli utenti devono immettere una password per l'accesso . Questo articolo intende dimostrare come proteggere una pagina Web segreto annidato all'interno di un programma CGI scritto in Perl . Altri linguaggi lato server potrebbero essere utilizzati per svolgere tale compito, ad esempio ASP.NET o C , ma Perl è preferito qui per la sua flessibilità e la relativa facilità. Avrete bisogno e conoscenza intermedia di Perl e di conoscenza di server e FTP . Cose che ti serviranno Text Editor password di file Show More Istruzioni Forms Authentication 1 Creare una pagina di login password nel editor di testo . Questo viene fatto in HTML che richiama uno script CGI quando si preme il pulsante . Un esempio di script HTML per farlo è il seguente : autenticazione < /title> Autenticazione <h1> <body> richiesto < /h1 > <hr> < nome = metodo auth = posta action = " cgi-bin/pwd_in.cgi " > Tipo Password : <INPUT TYPE=password NAME="pwd" SIZE=15 MAXLENGTH=25> <p> < INPUT TYPE = submit value = " Enter " > < /form > < /body> < /html > <br> 2 <p> Creare un file di password con un editor di testo che include i nomi utente e le password degli individui che hanno l'autenticazione per accedere il sito . Le informazioni contenute nel file di seguito è stato delimitato con tag XML personalizzati . È possibile delimitare con quello che vuoi , mi capita di trovare delimitatori XML molto pragmatico . Salvare il file come " pwds.txt . " <nome> Mike Smith < /name> <pw> 123abc < /pw > <name> John Smith < /name> <pw> 456abc < /pw > < name> Mary Smith < /name> <pw> 789abc < /pw > <br> 3 <p> Creare lo script CGI . Il seguente script CGI Perl prende l' input dell'utente e la confronta con le informazioni nel file pwds.txt . Se la password è corretta , si saluta l'utente per nome e poi apre le informazioni segrete . Se la password non viene trovato, un messaggio di errore viene stampato. Salvare il seguente script come " pwd_in.cgi . " # /Usr /bin /perl- wprint "Content -type : text /html \\ n \\ n"; <br> <p> uso CGI ; <br> <p> ! $ q = new CGI ; $ pwd = $ q - > param ( ' pwd '); $ cgi = new CGI ; <br> <p> aperto ( pWD , " < pwds.txt " ) ; $ errore = " <h2> password errata < /h2 > <hr> " ; ! <br> <p> mentre ( <pwd> ) { <br> <p> if ( /<name> ( * ) . ? < \\ /name> <pw> < \\ /pw > /è) ( * . ) { $ nome {$ 1} = $ 1 , $ pw {$ 1} = $ 2; @ p_words = $ pw {$ 1} ; } <br> <p> foreach $ p ( @ p_words ) { <br> <p> if ( $ p eq " $ pwd " ) { $ errore = " " ; <br> <p> stampa " <head> < ; ! title> The Secret Pagina < \\ /title> < \\ /head> <h2> $ nome Hey {$ 1} , contento che ti potrebbe rendere < /h2 > <hr> <p> Ecco l' informazioni top secret < /p > < \\ /body> " ; } } <br> <p> <br> <p> } print $ error ; <br> 4 <p> caricare i file . Carica il file HTML nella cartella HTML e gli altri due file sul cgi-bin . <br> 5 <p> usare chmod con il file cgi . Potrebbe essere necessario concedere le autorizzazioni per gli utenti esterni di accedere a questo file. Per concedere l'autorizzazione , al prompt di UNIX , digitare: > $ " chmod 755 pwd_cgi " <br> 6 <p> eseguire il programma. Aprire il file HTML e digitare una password di autentico . Si aprirà una pagina che accoglie il nome che la password è associata , nonché una frase che dice: " Ecco le informazioni segrete . " Digitare una password errata o nessuna password , e riceverai un messaggio di errore . <br> <br>
<div class=ad2><script language='javascript' src='/ad/201310/4.js'></script></div>
</div>
</td>
</tr>
</table>
<table width="95%" height="1" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#DEE7EE">
<tr>
<td></td>
</tr>
</table>
<table width="100%" height="7" border="0" cellpadding="0" cellspacing="0">
<tr>
<td></td>
</tr>
</table>
<table width="91%" height="52" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="51%"><p>Previous ： <a class='LinkPrevArticle' href='/Programmazione/perl-programming/93400.html' >Come convertire i file piatti in XML </a></li></p></td>
</tr>
<tr>
<td width="49%"> next ： <a class='LinkNextArticle' href='/Programmazione/perl-programming/93402.html' >Come rimuovere i duplicati da array Perl </a></li></td>
</tr>
</table></td>
</tr>
</table>
<table width="100%" height="7" border="0" cellpadding="0" cellspacing="0">
<tr>
<td></td>
</tr>
</table>
<table width="770" height="246" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="375" height="246" valign="top"><table width="380" border="0" cellpadding="0" cellspacing="0" class="bian">
<tr>
<td height="244" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" background="img_dm/danmai_r4_c04 -.jpg" bgcolor="#DBE3EE">
<tr>
<td width="4%" height="29"> </td>
<td width="96%" class="lan_lm"> Articoli Correlati </td> </tr>
</table>
<table width="95%" height="209" border="0" align="center" cellpadding="0" cellspacing="4">
<tr>
<td height="201"><table width="100%" cellpadding="0" cellspacing="0"><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/perl-programming/93190.html" title="Che linguaggio di programmazione è chiamato il Duct Tape di Internet " target="_self">Che linguaggio di programmazione è chiamato il Duct Ta…</a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/perl-programming/93401.html" title="Come impostare l'autenticazione Forms " target="_self">Come impostare l'autenticazione Forms </a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/perl-programming/93412.html" title="Come aggiungere i moduli a Perl " target="_self">Come aggiungere i moduli a Perl </a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/perl-programming/93240.html" title="Come fare una matrice di una certa dimensione in Perl " target="_self">Come fare una matrice di una certa dimensione in Perl </a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/perl-programming/93277.html" title="Come faccio a spingere un percorso a percorso variabile di ambiente Unix in Perl ? " target="_self">Come faccio a spingere un percorso a percorso variabile…</a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/perl-programming/93193.html" title="My Perl String Split non funzionante " target="_self">My Perl String Split non funzionante </a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/perl-programming/93269.html" title="Come passare gli input da PHP a Perl " target="_self">Come passare gli input da PHP a Perl </a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/perl-programming/93324.html" title="Come rimuovere le stringhe numeriche in Perl " target="_self">Come rimuovere le stringhe numeriche in Perl </a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/perl-programming/93403.html" title="Come scrivere Perl Script " target="_self">Come scrivere Perl Script </a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/perl-programming/93219.html" title="Come modificare la barra del titolo in Perl Script " target="_self">Come modificare la barra del titolo in Perl Script </a></td></tr><tr></tr></table></td>
</tr>
</table></td>
</tr>
</table></td>
<td width="20" valign="top"></td>
<td width="375" valign="top"><table width="380" border="0" cellpadding="0" cellspacing="0" class="bian">
<tr>
<td height="244" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" background="img_dm/danmai_r4_c04 -.jpg" bgcolor="#DBE3EE">
<tr>
<td width="4%" height="29"> </td>
<td width="96%" class="lan_lm">Articoli in evidenza </td> </tr>
</table>
<table width="95%" height="207" border="0" align="center" cellpadding="0" cellspacing="4">
<tr>
<td height="199"><table width="100%" cellpadding="0" cellspacing="0"><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/python-programming/93619.html" title="Come aggiungere ogni elemento di una lista in Python " target="_self">Come aggiungere ogni elemento di una lista in Python </a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/java-programming/90638.html" title="Come convertire oggetti Java " target="_self">Come convertire oggetti Java </a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/python-programming/93769.html" title="La funzione all'intero più vicino in Python " target="_self">La funzione all'intero più vicino in Python </a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/visual-basics-programming/96086.html" title="Come creare una macro in Word che Will e-mail Utente Input Text Box " target="_self">Come creare una macro in Word che Will e-mail Utente In…</a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/computer-programming-languages/88357.html" title="Come creare un programma di installazione per un servizio Windows " target="_self">Come creare un programma di installazione per un serviz…</a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/php-mysql-programming/91669.html" title="Come Pixel -Track per una pagina di reindirizzamento " target="_self">Come Pixel -Track per una pagina di reindirizzamento </a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/computer-programming-languages/87204.html" title="Come trovare se un Char è un numero intero su ASP.NET " target="_self">Come trovare se un Char è un numero intero su ASP.NET </a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/visual-basics-programming/95791.html" title="Tipi di Visual Basic " target="_self">Tipi di Visual Basic </a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/visual-basics-programming/95097.html" title="Come avere una Conferma Script & Validazioni su un pulsante di invio in ASP.NET " target="_self">Come avere una Conferma Script & Validazioni su un puls…</a></td></tr><tr><td width="10" valign="top" class="">·</td><td class=""><a class="" href="/Programmazione/python-programming/93931.html" title="Come trasformare il Off warning di deprecazione Python " target="_self">Come trasformare il Off warning di deprecazione Python </a></td></tr><tr></tr></table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<table width="980" height="8" border="0" cellpadding="0" cellspacing="0">
<tr>
<td></td>
</tr>
</table>
<table border=0 cellSpacing=0 cellPadding=0 width=980 bgColor=#36506e height=90>
<tr>
<td class=bs height=90 align=middle>Copyright © Conoscenza Informatica http://it.wingwit.com
<script language='javascript' src='/ad/201310/1.js'></script></td>
</tr>
</table>
</div>
</body>
</html> | | |
