如果用户输入空字符串,如何提示输入和退出？

Question

我是Perl的新手,我正在编写一个程序,我想强制用户输入一个单词.如果用户输入空字符串,则程序应退出.

这是我到目前为止:

print "Enter a word to look up: ";

chomp ($usrword = <STDIN>);

Answer 1

你快到了.

print "Enter a word to look up: ";
my $userword = <STDIN>; # I moved chomp to a new line to make it more readable
chomp $userword; # Get rid of newline character at the end
exit 0 if ($userword eq ""); # If empty string, exit.