Question

perl 中有那个函数可以获取键盘正在输入！！类似c里面的 _kbhit()函数?

Answer 1

user Term::Readkey;
while (1) { my $c = ReadKey(1); }

追问

你知道什么是kbhit么？？大神？？你的readkey;没用的

Answer 2

my $a=<STDIN>;
print $a;