Perl script to display the currently "most connected IPs" on a machine, which is done by scanning the netstat output