my @inhalt = qx (/usr/local/nagios/libexec/check_nrpe20 -H 172.20.2.121 -p 5666 -c check_jobinfos); my $create_query = "CREATE TABLE job(jobname VARCHAR(52), beschreibung VARCHAR(50), user VARCHAR(12), status VARCHAR(5))"; my $query_fuellen0 = $dbh->prepare("INSERT INTO job VALUES(?,?,?,?)"); $dbh->do( $create_query); for my $zeile ( @inhalt ){ $query_fuellen0->execute( split /,/, $zeile ) or warn $dbh->errstr; }