diff options
author | ivan <ivan> | 1999-04-22 04:12:53 +0000 |
---|---|---|
committer | ivan <ivan> | 1999-04-22 04:12:53 +0000 |
commit | 68ac5fb47fd935559018602bf411e5d14b966728 (patch) | |
tree | cdbda62b98a3219fbedd07af944de9c1472c37b4 | |
parent | 59334ecde5ad866ad8937f002f1faee48c1906d6 (diff) |
*** empty log message ***
-rwxr-xr-x | cgi/persons.cgi | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/cgi/persons.cgi b/cgi/persons.cgi index 4c7e03e..fc9de50 100755 --- a/cgi/persons.cgi +++ b/cgi/persons.cgi @@ -1,5 +1,5 @@ #!/usr/bin/perl -Tw -# $Id: persons.cgi,v 1.1 1999-01-27 09:55:05 ivan Exp $ +# $Id: persons.cgi,v 1.2 1999-04-22 04:12:53 ivan Exp $ # Copyright (c) 1999 Ivan Kohler. All rights reserved. # This program is free software; you can redistribute it and/or modify it under # the same terms as perl itself @@ -13,9 +13,9 @@ use CGI; use CGI::Carp qw(fatalsToBrowser); use DBI; -$data_source = "DBI:mysql:test"; -$user = "ivan"; -$password = ""; +$data_source = "DBI:mysql:technostate"; +$user = "agent"; +$password = "t3chno"; $table = "PERSONS"; @fields = qw( ID NAME EMAIL AFFILIATION ); |