bin/netstatapn

   1 #! /bin/bash
   2 pfiles 2>/dev/null `cd /proc;echo *` \
   3                 |awk '/^[0-9]/{idpid=$1;idproc=$2}/ AF_INET6? .*port: /{printf "%6s%-50s %15s:%d\n",idpid,idproc,$3,$5}' \
   4                 |sort -t : -k 3 -n