读取用户输入，同时提供文件名作为参数

Question

我正在用perl创建我的第一个程序，我想要求用户从键盘输入一些信息，同时还要读取一些作为参数提供的文件。

有没有办法指定钻石运营商＆＃39;＆lt;＆gt;＆＃39;只考虑用户输入？

这是我写的代码：

print "Enter a number: ";
my $input = <>;

# do something with the input

while(<>){
     print "line $.: $_";
}

Answer 1

您可以使用<STDIN>代替<>，

my $input = <STDIN>;

所以稍后钻石用法将从@ARGV arguments数组中读取文件。