关于字符串和数字互相转换的困惑

linux_arm

#!/usr/bin/perl use strict; my @fred = qw{1 3 5 7 9}; my $fred_total = &total(@fred); print "The total of \@fred is $fred_total.\n"; print "Enter some numbers on separate lines: "; my $user_total = &total(<STDIN>); #my $user_total = &total(1..1000); print "The total of those numbers are $user_total.\n"; sub total { &nbsp;&nbsp;&nbsp;&nbsp;my $sum = 0; &nbsp;&nbsp;&nbsp;&nbsp;my $tmp = 0; &nbsp;&nbsp;&nbsp;&nbsp;foreach $tmp (@_) { &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;#这里的$tmp应该有个换行符啊，为什么不用chomp也可以呢？ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;$sum += $tmp; &nbsp;&nbsp;&nbsp;&nbsp;} &nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;return $sum; }

字符串在转换为标量时会自动把换行符去掉吗？

linux_arm

其实我是想在那里加个chomp的，结果提示Modification of a read-only value attempted

经过google和百度，终于理解函数传进来的是个常量而非变量。

mwm5

类似于 $sum=1+"2abc\n"
结果是3
数字后头的字符对结果没影响

linux_arm

受教了，谢谢指导

2gua

<STDIN>后面一般要加上chomp吧。

wfnh

my $user_total = &total(chomp（<STDIN>）);
这样好点吧···一般输入都chomp好点吧！？

mwm5

加上应该是个好的习惯，虽然在这里不会影响结果(因为是对数值计算)
输入STDIN的时候\n只是一个结束标志，并非真正想要的
chomp一下，避免处理字符的时候出问题(长度计算、截取操作)等吧？