perl单行命令统计项目中代码单行过长的信息

原创

已于 2023-12-10 12:52:49 修改 · 566 阅读

10 ·

CC 4.0 BY-SA版权

文章标签：

#perl #Linux #C++ #bash #git

于 2023-12-10 12:42:14 首次发布

文章介绍了如何使用Perl单行命令和脚本来统计项目中.h,.cpp,.cc文件中单行代码长度，重点关注长度超过170的代码，提供了两种实现方式并展示了运行效果。

项目中单行代码太长是不便于阅读和维护的，这里用perl单行命令实现项目中的单行过长的代码信息统计，方便修改。为方便说明，这里以一个开源项目为例，github链接evpp。以commit id 477033f938fd47dfecde43c82257cd286d9fa38e 为例，git checkout -b test 477033f938fd47dfecde43c82257cd286d9fa38e 切一个分支测试。这里统计后缀为 (h|cpp|cc) 的代码，假定要统计单行长度超过170的代码所在的文件名和行数索引。下面给出命令：

find . -type f \( -name '*.cpp' -o -name '*.h' -o -name '*.cc' \) | xargs -i perl -lne '$len=length;print qq($ARGV:$. => length=$len) if $len > 170' {
   
   }