用perl偷懒 -- 统计java代码行数

DQP

从javaeye上看到一个帖子.  java代码统计小工具:

1. http://www.javaeye.com/topic/543246?page=1

复制代码

统计个行数而已 居然写了将近90行。 而且还有bug  没有考虑 "/*" 与代码写在同一行的情况. 即如下这种情况

1. 
   
2. i =1； /*
   
3. balabal
   
4. */
   

复制代码

假设那不考虑那个bug 因为一般没人那么写注释
把那段代码翻译成perl

1. 
   
2. find . -name "*.java" | xargs perl -e '$cnt++ unless(m/^\s*$/ || m/^\s*\/\// || m/\/\*/ .. m/\*\//); END{print $cnt, "\n"}' -n
   

复制代码

  省下的时间可以去喝杯咖啡了


p.s 这些都是用来娱乐的如果要做代码分析 还是推荐去找个专业的工具

flw

其实用 java 写也用不了 90 行，
只是有些人的思维习惯已经固化成了非 unix tools 风格了。
比如查找个 *.java 也要写代码，其实只需要好好利用管道，就可以很好地和其它的工具粘合在一起。

ttcn_cu

注释确实是一件非常棘手的事情.
我记得c++ 可以用g++ -E参数来搞定
我用它处理过类C++语法的源代码
感觉java也是类C++注释风格,应该可以创建零时文件,改扩展名为.cc然后用g++ 来处理

ttcn_cu

呵呵,让人想起了一些vbs党

ttcn_cu

呵呵Perl就是机器人

billypeng

我只用wc 来统计行数， 注释也是一部分。

统计行数没有必要那么精确。

DQP

关于代码行数的简单介绍 http://en.wikipedia.org/wiki/Source_lines_of_code