为什么’print(52-80)* 42’与Perl中的’print 42 *(52-80)’不

发布时间：2020-12-15 21:15:18 所属栏目：大数据来源：网络整理

导读：Perl ::什么是： 1. (52-80)*422. 42*(52-80) 答： 1. -282. -1176 为什么？请乐趣解释/证明这一点！ #!/usr/bin/perluse strict;print 42*(52-80),"n";print ((52-80)*42),"n";print (52-80)*42,"n";print "n";my $i=(52-80)*42;print $i,"n"; 输出：

Perl ::什么是：

1. (52-80)*42
2. 42*(52-80)

答：

1. -28
2. -1176

为什么？

请乐趣解释/证明这一点！

#!/usr/bin/perl
use strict;
print 42*(52-80),"n";
print ((52-80)*42),"n";
print (52-80)*42,"n";
print "n";
my $i=(52-80)*42;
print $i,"n";

输出：

> -1176
> -1176-28
> -1176

解决方法

如果您添加 use warnings;,您将获得：

print (...) interpreted as function at ./test.pl line 5.
Useless use of a constant in void context at ./test.pl line 5

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!