📅  最后修改于: 2021-01-07 08:09:47             🧑  作者: Mango
在Perl编程中,我们可以使用
my $name = ;
等效于:
my $name = <>;
让我们看一个示例,其中我们使用标准输入
输入:
use 5.010;
use strict;
use warnings;
say "Enter your Name:";
my $name = ;
say "Welcome $name at JavaTpoint.";
在这里,$ name是一个标量变量。使用我的关键字声明变量。运行此脚本后,它将要求您输入名称。在控制台中键入您的名称,然后按Enter。
输出:
Enter your Name:
John
Welcome John
at JavaTpoint.
如您在上面的输出中看到的,在打印名称之后添加了新行。要解决此问题,请使用$ name添加chomp函数,如下所示。
use 5.010;
use strict;
use warnings;
say "Enter your Name:";
my $name = ;
chomp $name;
print "Welcome $name at JavaTpoint.\n";
输出:
Enter your Name:
John
Welcome John at JavaTpoint.