my $inhalt2 = qx (check_nrpe20 -H $ARGV[0] -p 5666 -c check_jobmon); my $query_del = $dbh->prepare("DROP TABLE IF EXISTS job"); my $create_query = "CREATE TABLE job(jobname VARCHAR(20), beschreibung VARCHAR(20), user VARCHAR(12), status int, cdate date, edate date, periodical int)"; my $query_fuellen0 = $dbh->prepare("INSERT INTO job VALUES(?,?,?,?,?,?,?)"); $query_del->execute(); $dbh->do($create_query); for my $zeile(@inhalt) { $query_fuellen0->execute(split /,/, $zeile) or warn $dbh->errstr; }