公司某同事撰写，非本人原创，下载地址：

http://sudone.com/download/nettraf.pl

使用方法：

perl nettraf.pl

或指定网卡

perl nettraf.pl -i eth0

执行之后，会每秒钟打印一条结果，且结果准确。