mysql verbindung

[Siechfred]

my $DB_DSN = "DBI:mysql:database=$DB_NAME";
[...]
my $dbh = DBI->connect($DB_DSN, $DB_USER, $DB_PASSWD) or print "Fehler bei Datenbankverbindung: $!";

Hast du mal versuchst, Hostname und ggf. Port anzugeben, wie es in der Dokumentation zu DBI.pm beschrieben ist? Also so:

my $usr = 'Name';  
my $pwd = 'Passwort';  
my $driver = 'mysql';  
my $host = 'localhost';  
my $dbn = 'Datenbank';  
my $dbh = DBI->connect("DBI:$driver:$dbn:$host", $usr, $pwd) || die $DBI::errstr;

So muss es funktionieren, wenn nicht, wende dich an den Support von Strato.

Siechfred