use constant DBNAME => "database_test"; #database_test | database ... my $dbh = DBI->connect('DBI:mysql:database=database','username','password') or die(); ...