Zadanie: Ustalanie ojcostwa

Ustalanie ojcostwa

Wykorzystując definicję hasza określającego drzewo genealogiczne, napisz skrypt, który pozwoli prześledzić pochodzenie danej osoby. Powinien on:
  1. Wczytać z klawiatury imię
  2. Wydrukować imię ojca danej osoby
  3. Wydrukować imię ojca tego ojca
  4. I tak dalej, aż dojdziemy do ostatniej osoby
Ostatnią osobę, która nie ma ojca (bo została stworzona w inny sposób) możesz wykryć wykorzystując funkcję (*). Prześlij plik ze swoim rozwiązaniem.
(*)Odwołanie do nieistniejącego elementu hasza zwraca wartość
undef
. Funkcja
defined($hasz{$klucz})
zwraca wartość prawda dla elementów istniejących (tzn. gdy istnieje wartość przypisana do danego klucza) i wartość fałsz w przypadku przeciwnym.