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";

使用命令line.Ran很好地运行同样的代码:面对一个问题，我希望第一行输出为:-输入圆圈半径:在屏幕上等待输入，然后依次运行--有人能告诉我为什么命令行运行得很好，而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

虽然“严格使用”和拼写正确的“谢邦”行都是好东西，但实际原因也不是。在非命令行环境中运行交互式程序时，通常应该关闭I/O缓冲区。在Perl中，您应该将这一行放在代码的顶部：

$| = 1;

Answer 2

我已经测试了您的脚本使用Komodo编辑，它工作良好，其他，然后以下几处更正。

#!/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