#!/bin/sh
#
# Copyright (C) 1995  Lars Berntzon
#
netstat -in | $AWK '$4~/^[0-9]/ && $4 !~ /^127.0.0/ {print $4}'
