% perl
print "Hi. Your name, please: ";
chomp( my $name = <STDIN> );
print "Oh, $name, I think I am your system. Glad to be at your service.\n";
# Press CTRL-D or whatever shortcut to trigger EOF
Hi. Your name, please: Florian
Oh, Florian, I think I am your system. Glad to be at your service.