wc -L < filename

给了

101

在perl中:

perl -ne 'print ($l = $_) if (length > length($l));' filename | tail -1

这只打印行，不打印它的长度。

wc -L < filename

给了

101

perl -ne 'print length()."  line $.  $_"' myfile | sort -nr | head -n 1

打印最长行的长度、行号和内容

perl -ne 'print length()."  line $.  $_"' myfile | sort -n

打印所有行的排序列表，包括行号和长度

． 是连接运算符-它在这里用在length()之后 美元。当前行号是多少 $_是当前行

我在Unix环境中，使用gzip压缩的文件，大小只有几gb。我使用一个记录长度为2052的2 GB gzip文件测试了以下命令。

zcat < gzipped文件- > |厕所

and

Zcat <gzip文件> | awk '{打印长度}' | sort -u

时间是平均的

117秒 109秒

这是我运行10次后的脚本。

START=$(date +%s) ## time of start

zcat $1 |  wc -L

END=$(date +%s) ## time of end
DIFF=$(( $END - $START ))
echo "It took $DIFF seconds"

START=$(date +%s) ## time of start

zcat $1 |  awk '{print length}' | sort -u

END=$(date +%s) ## time of end
DIFF=$(( $END - $START ))
echo "It took $DIFF seconds"

主题的变化。

它将显示文件中最长行长度的所有行，并保留它们在源代码中出现的顺序。

FILE=myfile grep `tr -c "\n" "." < $FILE | sort | tail -1` $FILE

那么myfile

x
mn
xyz
123
abc

将会给

xyz
123
abc