Dr. Andreas Borchert Abteilung Angewandte Informationsverarbeitung 25. November 2002
Ingo Melzer Blatt 5






OO-Datenbank Anwendungen (WS 2002)


Abgabetermin 2. Dezember 2002

Kein Schwein ruft mich an (6 Punkte)

Es kann manchmal ganz nett sein, Telefonnummern automatisch aus Dokumenten zu extrahieren. Schreiben Sie dafuer ein kleines Perl Skript, das gültige Telefonnummern auf einer gegebenen Eingabe filtert.

Eine gültige Telefonnummer besteht aus einer Vorwahl (die mit einer Null beginnt) und der Nummer in dieser Stadt. Vor der Vorwahl darf eine Länderkennung stehen, die aber mit einem Plus oder zwei Nullen eingeleitet werden muss - in diesem Fall fällt aber die Null der Vorwahl unter den Tisch. Es ist zulässig, die Vorwahl in runden Klammern zusammenzufassen. Zusaätzlich dürfen zur besseren Lesbarkeit Bindestriche oder Schrägstriche verwendet werden.

F1 (4 Punkte)

In der Formel 1 gibt es jedes Jahr eine zweistellige Anzahl von Rennen. In jedem bekommt der Sieger 10, der Zweite 6, der Dritte 4, der Vierte 3, der Fünfte 2 und der Sechste einen Punkt. Alle anderen gehen leer aus. Wer am Ende des Jahres die meisten Punkte bekommen hat, hat (man wird es kaum glauben) den Namen Schuhmacher, ups nein, die WM gewonnen. Schreiben Sie nun ein Perl-Skript, das aus einer Eingabe in folgendem Format den aktuellen WM-Stand bestimmt:

      Australian GP (Melbourne)
      1. Michael Schumacher
      2. David Coulthard
      3. Rubens Barrichello
      4. Nick Heidfeld
      5. Heinz-Harald Frentzen
      6. Kimi Raikkonen

Eine mögliche Eingabe gibt es hier.