package Data_config;

use Exporter;
@ISA = qw(Exporter);

@EXPORT = qw(
        $DBHOST
        $DBPORT
        $DBDRIVER
        $DATABASE
        $USERNAME
        $PASSWORD
);

## Database configuration ##
our $DBHOST   = "localhost";
our $DBPORT   = "3306";
our $DBDRIVER = "mysql";
our $DATABASE = "database";
our $USERNAME = "database";
our $PASSWORD = "password";

##</code><code>##

## Create a database handle ##
my $DSN = "DBI:$DBDRIVER:database=$DATABASE:host=$DBHOST:port=$DBPORT";
my $DBH = DBI->connect($DSN, $USERNAME, $PASSWORD, {
        RaiseError => 1,
        PrintError => 1
});