Leser: 2
![]() |
|< 1 2 3 4 5 6 >| | ![]() |
56 Einträge, 6 Seiten |
1
2
3
4
5
6
7
8
9
10
package My::Config;
use strict;
use Readonly;
Readonly our $DATABASE => "drow";
Readonly our $DB_TABLE => "drow_dictionary";
Readonly our $DB_USERNAME => "root";
Readonly our $DB_PASSWORD => "";
1;
1
2
3
4
5
6
require "drow_pwx.pl"; # Contains database credentials
...
my $dbh = DBI->connect("DBI:mysql:$My::Config::DATABASE:localhost", $My::Config::DB_USERNAME, $My::Config::DB_PASSWORD ) ||
die( "Could not establish database connection: ".$DBI::errstr );
$dbh->do( "delete from $My::Config::DB_TABLE" );
# usw.
dir C:\Programme\xampp\apache\bin
use lib ('C:\Programme\xampp\htdocs\drow');
![]() |
|< 1 2 3 4 5 6 >| | ![]() |
56 Einträge, 6 Seiten |