如何在使用Perl';s术语::ShellUI?

如何在使用Perl';s术语::ShellUI?,perl,terminal,Perl,Terminal,我用过几乎所有的东西 按预期工作,但问题是当我按下Ctrl-C时,我想 打印: 请使用ctrl+d退出shell 为此,我处理信号,但只有在我按下新行后才会打印消息 如何解决此问题?您可以在打印前将$|变量设置为1,而无需使用IO::Handle库 $SIG{INT} = sub { $| = 1; print "Please use ctrl+d to exit the shell"; } 这是行不通的。看看真正的答案

我用过几乎所有的东西 按预期工作,但问题是当我按下Ctrl-C时,我想 打印:

请使用ctrl+d退出shell

为此,我处理信号,但只有在我按下新行后才会打印消息
如何解决此问题?

您可以在打印前将$|变量设置为1,而无需使用IO::Handle库

$SIG{INT} = sub {
   $| = 1;
   print "Please use ctrl+d to exit the shell";
}
这是行不通的。看看真正的答案