perl中的用户输入

river

现在，可能想你的Perl 程序怎样才能从键盘上得到输入呢？有一种简单方法：使用行输入操作符(line-input operator)，
<STDIN>◆。
◆是行输入运算符对文件句柄STDIN 的操作。但直到第五章才介绍文件句柄。
<STDIN>作为标量值来使用的，Perl 每次从标准输入中读入文本的下一行，将其传给<STDIN>。标准输入可以有很多种；
默认的是键盘。如果还没有值输入<STDIN>，Perl 会停下来等你输入一些字符，由换行符结束（return）◆。
◆坦白讲，是你的系统等待输入，Perl 等待你的系统。具体的细节与机器和配置有关。由于是系统而非Perl 控制你的输入，因此要更正错
误的输入通常可以在按下回车前使用退格键（backspace）。如果想更多的控制输入，可以使用Term::ReadLine 这个模块，在CPAN 中可
以下载到。
<STDIN>中的字符串通常由一个换行符作为结尾◆。因此，可以如下操作：
◆例外的情况是，标准输入流在行中间就结束了。当然，普通的文本文件通常不是这样。
$line = <STDIN>;
if($line eq “\n”){
print “That was just a blank line!\n”;
}else{
print “That line of input was: $line”;
}
实际上，通常你不需要保留换行符，因此需要chomp 来去掉它。