我正在寻找一个命令,它将接受(作为输入)多行文本,每行包含一个整数,并输出这些整数的和。
作为一点背景知识,我有一个日志文件,其中包括计时测量。通过grepping的相关行和一点sed重新格式化,我可以列出该文件中的所有时间。我想算出总数。我可以将这个中间输出输出到任何命令,以便进行最终求和。我过去一直使用expr,但除非它在RPN模式下运行,否则我不认为它会处理这个问题(即使这样也会很棘手)。
我怎样才能得到整数的和?
我正在寻找一个命令,它将接受(作为输入)多行文本,每行包含一个整数,并输出这些整数的和。
作为一点背景知识,我有一个日志文件,其中包括计时测量。通过grepping的相关行和一点sed重新格式化,我可以列出该文件中的所有时间。我想算出总数。我可以将这个中间输出输出到任何命令,以便进行最终求和。我过去一直使用expr,但除非它在RPN模式下运行,否则我不认为它会处理这个问题(即使这样也会很棘手)。
我怎样才能得到整数的和?
当前回答
替代纯Perl,相当可读,不需要包或选项:
perl -e "map {$x += $_} <> and print $x" < infile.txt
其他回答
sed 's/^/.+/' infile | bc | tail -1
一个简单的解决方案是编写一个程序来为你做这件事。这可能在python中很快就可以完成,类似于:
sum = 0
file = open("numbers.txt","R")
for line in file.readlines(): sum+=int(line)
file.close()
print sum
我还没有测试该代码,但它看起来是正确的。只需将numbers.txt更改为文件名,将代码保存到一个名为sum.py的文件中,并在控制台中键入"python sum.py"
使用GNU数据集util:
seq 10 | datamash sum 1
输出:
55
如果输入的数据是不规则的,空格和制表符在奇怪的地方,这可能会混淆数据集,然后使用-W开关:
<commands...> | datamash -W sum 1
...或者使用tr清除空白:
<commands...> | tr -d '[[:blank:]]' | datamash sum 1
如果输入足够大,输出将采用科学计数法。
seq 100000000 | datamash sum 1
输出:
5.00000005e+15
要将其转换为十进制,使用——format选项:
seq 100000000 | datamash --format '%.0f' sum 1
输出:
5000000050000000
《球拍》中的一句俏皮话:
racket -e '(define (g) (define i (read)) (if (eof-object? i) empty (cons i (g)))) (foldr + 0 (g))' < numlist.txt
我知道这是一个老问题,但我很喜欢这个解决方案,愿意与大家分享。
% cat > numbers.txt
1
2
3
4
5
^D
% cat numbers.txt | perl -lpe '$c+=$_}{$_=$c'
15
如果有兴趣,我将解释它是如何工作的。