Borderline
Deleted
Jan 13, 2000, 5:14 AM
Post #2 of 5
(554 views)
|
Hi
There are only 3 ways I know of to keep the password hidden.
1) You would use method post and hidden tags.
2) You use Cookies and method post.
3) You use .htaccess.
In my opinion doing it with cookies are the best way....
Here is a Cookie Password example
<BLOCKQUOTE><font size="1" face="Arial,Helvetica,sans serif">code:</font><HR>
#!/usr/bin/perl -w
my $login = 'mylogin';
my $pass = 'mypass';
use strict;
use vars qw(%h);
use CGI;
my $q = new CGI;
if (not &check_pass) { &login; exit; }
print $q->header(%h);
# Rest of your script here
print 'You made it';
sub check_pass {
if (($q->param('login') and $q->param('password')) and
$q->param('login') eq $login and
$q->param('password') eq $pass)
{
my $c1 = $q->cookie(-name=>'login',
-value=>$login);
my $c2 = $q->cookie(-name=>'password',
-value=>$pass);
%h = (-cookie=>[$c1,$c2]);
return 1;
}
elsif ($q->cookie('login') eq $login and
$q->cookie('password') eq $pass)
{
return 1;
}
else {
return 0;
}
}
sub login {
print $q->header;
print <<END_OF_HTML;
<HTML>
<HEAD><TITLE>Login</TITLE></HEAD>
<BODY bgcolor=#FFFFFF>
<FORM method=post>
Login: <INPUT type=text name=login><BR>
Password: <INPUT type=password name=password><BR>
<INPUT type=submit value=Login>
</FORM>
</BODY></HTML>
END_OF_HTML
}</pre><HR></BLOCKQUOTE>
Hope this helped
Scott
[This message has been edited by Borderline (edited 01-13-2000).]
|
MAIN
SEARCH
WHO'S 
LOG 