in reply to Re: DBI & CGI Security
in thread DBI & CGI Security
I also recommend the aforementioned O'Reilly's "CGI Progamming with Perl." And take a look at this node on CGI and passwords.my ($username, $keyfile, $domain) = @_; open (PASS, "</home/$username/$keyfile") or die "Error: $!\n"; flock (PASS, 2); my @keypass = <PASS>; close (PASS); foreach (@keypass) { chomp $_; } my $cipher = Crypt::CBC->new($keypass[0], 'Blowfish'); my $dbpass = $cipher->decrypt($keypass[1]); use DBI qw(:sql_types); my $userdatabaseName = "DBI:mysql:$domain"; my $userdatabaseUser = $username; my $userdatabasePw = $dbpass; $dbh = DBI->connect($userdatabaseName, $userdatabaseUser, $userdatabasePw, { RaiseError => 1},) or die "Connect failed: $DBI::er +rstr\n";
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^3: DBI & CGI Security
by jayrom (Pilgrim) on Jun 03, 2004 at 17:49 UTC | |
by bradcathey (Prior) on Jun 03, 2004 at 18:42 UTC | |
by jayrom (Pilgrim) on Jun 03, 2004 at 19:14 UTC |