my @sorted = qw(Name Vorname, Adresse PLZ Ort Telefon Geburtsdatum Eintritt);
my @ausgabe;
for my $part(@sorted){
  push(@ausgabe,$part) if(grep{$_ eq $part}@checkedFields);
}