my $count = 0;
my $satz = '';
while (defined(my $zeile = <FILE>)) {
    $count += ($zeile =~ m~"~); # " zählen
    $satz .= $zeile;
    if ($count % 2 == 0) {
        verarbeite_datensatz($satz);
        $satz = '';
        $count = 0;
    }
}