Perl STDIN
 
Perl STDIN
 
 在 Perl 编程中,我们可以使用 
 
   从标准控制台获取输入。它代表标准输入。它可以缩写为<>。所以,
 
 
 
 相当于: 
 
 
Perl Input from User using 
 
 
 让我们看一个例子,我们使用标准输入 
 
   从用户那里获取数据。
 
 
 输入: 
 
 
 
  use 5.010;
use strict;
use warnings;
say "Enter your Name:";
my $name = <STDIN>;
say "Welcome $name at lidihuo.";
 
   
  
 这里,$name 是一个标量变量。变量是使用 my 关键字声明的。运行此脚本后,它会询问您的姓名。在控制台中输入您的姓名并按 ENTER。
 
 输出: 
 
 
 
  Enter your Name:
John
Welcome John
  at lidihuo.
 
   
  
 正如您在上面的输出中看到的,在打印名称后添加了一个新行。要解决这个问题,请添加带有 $name 的 chomp 函数,如下所示。
 
 
 
  use 5.010;
use strict;
use warnings;
say "Enter your Name:";
my $name = <STDIN>;
chomp $name;
print"Welcome $name at lidihuo.\n";
 
   
  
 输出: 
 
 
 
  Enter your Name:
John
Welcome John at lidihuo.