use warnings;use strict;chomp ($a = <STDIN>);chomp ($b = <STDIN>);$maxof3 = &max3 ($a,$b);print "max3 is: ".$maxof3."\n";sub max3{ my($max_so_far) = shift @_; foreach (@_){ if($_ > $max_so_far){ $max_so_far = $_; } } $max_so_far;}
程序里用了use strict之后,就必须用our或者my声明变量。
总结以上是内存溢出为你收集整理的perl里的global symbol requires explicit package name at xx全部内容,希望文章能够帮你解决perl里的global symbol requires explicit package name at xx所遇到的程序开发问题。
如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)