11 lines
216 B
Plaintext
11 lines
216 B
Plaintext
{
|
|
my $dbn = $dl{'DbName'} || 'dl';
|
|
my $dbu = $dl{'DbUser'} || 'dl';
|
|
my $dbp = $dl{'DbPassword'} || 'secret';
|
|
$OUT .=<<"EOF"
|
|
\$dsn = "mysql:host=localhost;dbname=$dbn";
|
|
\$dbUser = "$dbu";
|
|
\$dbPassword = "$dbp";
|
|
EOF
|
|
}
|