netstat -an |awk '/^tcp/ {++$[$NF]} END {for (a in S) print a,s[a]}';