while (@details = $sth->fetchrow_array ()) { # Zeilenumbruch $details[4]=~ s/\n//g; # Aufzaehlungszeichen $details[4]=~ s/$sign([^$sign]+)$sign\s?/