open(STATUS, "netstat -an 2>&1 |")
                        || die "can't fork: $!";