unless (open(ALT,"<choices.txt")) {
  print "Konnte Datei 'choices.txt' nicht oeffnen: $!\n";
  exit 0;
}