+----------------------------------------------------------------------------------------+
| text                                                                                   |
+----------------------------------------------------------------------------------------+
|  client    name                           group            date   volume           (%) |
| mailxxxx  MSEXCH:PF                      MSEXBACKUP MB    12/15/08 000226L2       full |
| p2xxxx    SYSTEM DB:\                    xxxx              12/15/08 000xxxx       full |
| p2xxxx    SYSTEM STATE:\                 xxxx              12/15/08 000xxxx       full |
| snagxxxx   /                             DebugGroup          12/19/08 ACxxx       full |
+----------------------------------------------------------------------------------------+

my $create_query = "CREATE TABLE IF NOT EXISTS fehler(text VARCHAR(1000))";     
my $query_fuellen = qq~INSERT INTO fehler(text) VALUES(?);~;
my $sth = $dbh->prepare( $query_fuellen ) or die $dbh->errstr;

$dbh->do($create_query);
                
for my $i ( 0 .. 4 )
   {
    $sth->execute( $OUT[$i]) or die $dbh->errstr;
    }
$sth->finish;

my $query_fuellen = $dbh->prepare("INSERT INTO fehler VALUES(?,?,?,?,?)");
for my $zeile(@daten)
  	{
    next unless $zeile;    
  	$query_fuellen->execute(split /;/, $zeile) or warn $dbh->errstr;
  	}