my @zeile=($bugnumber, $sender, $maintainer, $date, $package, $severity);

     print WRITEFILE $zeile;
   }