undefined subroutine :chmop called at <STDIN> line 1 - Perl论坛 - 其它语言

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 开发语言 → 其它语言 → 『 Perl论坛』 → undefined subroutine :chmop called at <STDIN> line 1

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 4533 人关注过本帖

标题：undefined subroutine :chmop called at <STDIN> line 1

只看楼主加入收藏

lyl930130

等　级：论坛游侠
帖　子：323
专家分：111
注　册：2013-5-13
结帖率：91.43%

楼主

问题点数：0 回复次数：1

undefined subroutine :chmop called at <STDIN> line 1

错误提示：
undefined subroutine &main :: chmop called at ./a.pl line 9 , <STDIN> line 1.

代码如下：

程序代码：

#!/usr/bin/perl
$a = 3.141592654*2*12.5 ;
$pi = 3.141592654;
print "$a\n\n";

print "input the radius of a circle : ";
#$radius = 3;
$radius = <STDIN>;
chmop ( $radius );
#chmop ( $radius = <STDIN> ) ;
$circ = 2 * $pi * $radius ;
print "the circumference of the circle of raidus $radius is $circ\n";