#!/usr/bin/perl

print "Wie ist ihr Name?";
chomp($name = <STDIN>);

print "Ah! Hallo $name!";