小编use*_*577的帖子

我的AWK命令是:

awk'BEGIN {count=0} {count=count+($3-$2)} END {print count}' zebrafish

如何在Perl脚本中使用它？