Schreiben Sie ein Programm, dass mehrere Worte (strings) Zeilenweise einliest (getrennt durch Enter-Taste). Nach Beendigung der Eingabe (end-of-input, zB durch Tastenkombination Strg-D (Linux) oder Strg-Z (Windows)) sollen die Worte in Umgekehrter Reihenfolge ausgegeben werden.
#!/usr/bin/perl -w
@lines =; # Abbrechen mit Strg-D!
@lines = reverse @lines;
print "Rueckwaertsausgabe:\n";
print @lines;
