tcpdump top talkers perl script -> modified from my iptraf_parser.pl (iptrafdjs)