#!/usr/bin/perl -w

use strict; # allein um Tippfehler schnell aufzustoebern

print "Wie ist ihr Name? >> "; # Nach dem Namen prompten/fragen.

chomp( my $name = <STDIN> );   # Eingabe einlesen und Zeilenumbruch mit chomp entfernen.

print "Ah. Hallo $name!\n";    # Inhalt von $name ausgeben.

sleep( 5 ); # Programm und etwaiges Fenster noch 5 Sekunden offen halten.