netstat -antu | awk '/LISTEN/{print $1,$4}' | grep -v '::' | sed 's/:/ /' | awk '{printf("%s,%s,%s\n",$1,$2,$3)}' | sort -k2 | while read x; do   echo "$(hostname -s),$(uname -r | sed 's/\(.*\)\(el[67]*\)\(.*\)/\2/'),$x"; done

