大佬们,文件number.txt只有一列数字,怎么将这列数字
perl吧
全部回复
仅看楼主
level 2
大佬们,文件number.txt只有一列数字,怎么将这列数字读取并求和输出到sum.txt里[泪]
2019年05月03日 02点05分 1
level 2
2019年05月03日 02点05分 2
level 2
为什么报错[狂汗]
2019年05月03日 02点05分 3
你这个报错是因为用了use strict。但没定义变量 这样my $line就不会报错了
2019年05月07日 13点05分
level 1
想请问楼主是怎么解决的?
2019年05月04日 06点05分 4
level 1
这个挺简单的啊。你这一列数字总得有分割符吧。比如
1 2 3 4 5
就这样写:
while(<>){
@num=split/\s+/;
foreach $i(@num){
$sum+=$i;
}
print $sum;
}
这是计算每一行的,随便写了一下,没用use strict。你可以自行更改啊
2019年05月07日 13点05分 5
level 1
生科院前辈[笑眼]
2021年05月12日 03点05分 6
level 9
perl -nE'BEGIN{my$sum=0}$sum+=$_;END{say$sum} number.txt>sum.txt
2021年05月12日 04点05分 8
1