6 lines
No EOL
128 B
Perl
6 lines
No EOL
128 B
Perl
use warnings;
|
|
print("Hello, World!\n");
|
|
print("What is your name? ");
|
|
my $name = <STDIN>;
|
|
chomp($name);
|
|
print("Hello, $name\n"); |