清华大佬耗费三个月吐血整理的几百G的资源，免费分享！....>>>

nestat -n | perl -lane '$h{$F[5]++ if /tcp.*/;END {print "$_=>$h{$_}}" for keys %h}'