Perl 中的用户输入 - 在 KomodoEdit 中运行脚本时出现问题

Question

我在 gedit 上编写了这个小代码并运行它：-

#/usr/bin/perl
print "Enter the radius of circle: \n";
$radius = <>;
chomp $radius;
print "radius is: $radius\n";
$circumference = (2*3.141592654) * $radius;
print "Circumference of circle with radius : $radius = $circumference\n";

使用命令行运行良好。在 Komodo 上运行相同的代码编辑：面临一个问题，我希望第一行输出为：- 输入圆的半径：它在屏幕上等待即等待输入，然后按顺序运行所有内容 - 有人可以告诉我为什么它在命令行上运行良好，但在 Komodo 上运行不佳？

---

将 #/usr/bin/perl 更改为 #!/usr/bin/perl 后的输出:- 还必须声明我的 $radius 和我的 $circumference ------------------ ----------------------------------------------------

12 # same i had to enter 12
Enter the radius of circle: 
radius is: 12
Circumference of circle with radius : 12 = 75.398223696

Answer 1

虽然“使用严格”和拼写正确的 shebang 行总是好的，
两者都不是真正的原因。当你在一个交互式程序中运行一个
非命令行环境下，通常应该关闭 I/O 缓冲。
在 Perl 中，您应该将此行放在代码的顶部：

$| = 1;

Answer 2

我已经使用 Komodo edit 测试了您的脚本，除了下面的一些更正之外，它运行良好。

#!/usr/bin/perl -w
use strict;

print "Enter the radius of circle: \n";
my $radius = <>;
chomp $radius;
print "radius is: $radius\n";
my $circumference = (2*3.141592654) * $radius;
print "Circumference of circle with radius : $radius = $circumference\n";

科莫多输出

Enter the radius of circle: 
5
radius is: 5
Circumference of circle with radius : 5 = 31.41592654