print "What is your name? "; my $name = ; print "Hello, $name!\n";