while循环和输入（＆lt;＆gt;）Perl

Question

如何使用while循环w8直到用户输入内容？

$var = <>;
while(1){
somting $var;
}

Answer 1

尝试这样做：

use strict; use warnings;

print "type something >>> ";
chomp(my $var = <STDIN>);

while(1){
    print "type something from within the LoOp >>> ";
    chomp($var = <STDIN>);
    print "$var\n";
}

Answer 2

我不完全确定你在问什么，所以这是我的两次尝试......

如果您的意思是等待用户输入初始值，那么：

my $var = <>;

应该可以正常工作。

如果你想在循环中连续接收输入，我会这样做：

while(my $var = <>){
    something($var);
}

为了更深入地了解这一点，我建议this link.