TMTWWTDI: Perl有一个文件大小操作符(-s)

perl -lne '$t+=-s;END{print $t}' files.txt

打印ksh:

echo " 0 $(ls -l $(<files.txt) | awk '{print $5}' | tr '\n' '+') 0" | bc

在我看来，最简单的解决方案是"expr" unix命令:

s=0; 
for i in `cat files.txt | xargs ls -l | cut -c 23-30`
do
   s=`expr $s + $i`
done
echo $s

... | paste -sd+ - | bc

是我找到的最短的一个(来自UNIX命令行博客)。

编辑:增加了-参数的可移植性，谢谢@Dogbert和@Owen。

如果您没有安装BC，请尝试

echo $(( $(... | paste -sd+ -) ))

而不是

... | paste -sd+ - | bc

$() <——返回执行命令的值

$((1+2)) <——返回求值结果

Echo <——将它回显到屏幕

cat files.txt | awk '{ total += $1} END {print total}'

您可以使用awk来做同样的事情，它甚至会跳过非整数

$ cat files.txt
1
2.3
3.4
ew
1

$ cat files.txt | awk '{ total += $1} END {print total}'
7.7

或者您可以使用ls命令并计算人类可读的输出

$ ls -l | awk '{ sum += $5} END  {hum[1024^3]="Gb"; hum[1024^2]="Mb"; hum[1024]="Kb"; for (x=1024^3; x>=1024; x/=1024) { if (sum>=x) { printf "%.2f %s\n",sum/x,hum[x]; break; } } if (sum<1024) print "1kb"; }'
15.69 Mb

$ ls -l *.txt | awk '{ sum += $5} END  {hum[1024^3]="Gb"; hum[1024^2]="Mb"; hum[1024]="Kb"; for (x=1024^3; x>=1024; x/=1024) { if (sum>=x) { printf "%.2f %s\n",sum/x,hum[x]; break; } } if (sum<1024) print "1kb"; }'
2.10 Mb