use warnings; print("Hello, World!\n"); print("What is your name? "); my $name = ; chomp($name); print("Hello, $name\n");