Einführung in Perl, Sixth Edition

Lösungen zu den Übungen in Kapitel 5

1. So könnte eine mögliche Lösung aussehen:

   print reverse <>;

   Das ist ziemlich einfach. Diese Formulierung funktioniert, weil print eine Liste von Strings erwartet. Diese bekommt es, indem es reverse im Listenkontext aufruft. reverse sucht seinerseits nach einer Liste von Strings, die es umdrehen kann. Diese bekommt es, indem es die vom Diamant-Operator zurückgegebenen Daten ebenfalls im Listenkontext benutzt. Der Diamant-Operator gibt eine Liste aller Zeilen der Dateien zurück, die der Benutzer angegeben hat. Diese Liste entspricht der Ausgabe von cat. reverse dreht diese Liste nun um, und print gibt sie aus.

2. So könnte eine mögliche Lösung aussehen:

   print "Geben Sie einige Zeilen ein, und drücken Sie dann Strg-D:\n"; ...