Clean up and implement a proper installer

Makefile

@@ -0,0 +1,29 @@
+PREFIX?=	/usr/local
+LIBDIR?=	lib
+PROGNAME?=	tcldnssrv
+
+TARGET?=	$(PREFIX)/$(LIBDIR)/$(PROGNAME)
+
+TCLSH?=		tclsh
+
+UID?=		root
+GID?=		wheel
+
+all:
+
+pkgindex:
+	@echo "Generating pkgIndex"
+	cd $(TARGET) ; umask 022 ; echo "pkg_mkIndex -direct . *.tcl" | $(TCLSH)
+
+install-lib:
+	@echo "Installing $(PROGNAME) to $(TARGET)"
+	install -o $(UID) -g $(GID) -m 0755 -d $(TARGET)
+	install -o $(UID) -g $(GID) -m 0644 dnssrv.tcl $(TARGET)
+
+install-package: install-lib pkgindex
+
+install: install-package
+
+uninstall:
+	@echo "Uninstalling $(PROGNAME)"
+	rm -rf $(TARGET)

README.md

@@ -1,12 +1,17 @@
+[![GitHub
+release](https://img.shields.io/github/release/nugget/tcl-dnssrv.svg)](https://github.com/nugget/tcl-dnssrv/releases)
+
+
 # NAME
 
 dnssrv - Tcl DNS SRV Client
 
 # SYNOPSIS
 
-package require dnssrv
 
 ````
+package require dnssrv
+
 ::dnssrv::hostlist query ?options?
 ::dnssrv::tophost query ?options?
 ````

example.tcl

@@ -0,0 +1,23 @@
+#!/usr/bin/env tclsh
+
+if {[catch {source dnssrv.tcl} err]} {
+	package require dnssrv
+}
+
+proc main {} {
+	lappend hostlist _sweighted._tcp.prod.macnugget.org
+	lappend hostlist _weighted._tcp.prod.macnugget.org
+	lappend hostlist _testservice._tcp.prod.macnugget.org
+
+	foreach fqdn $hostlist {
+		puts "# Probing ${fqdn}\n"
+		puts "  \[::dnssrv::hostlist $fqdn\]"
+		puts "    [::dnssrv::hostlist $fqdn]"
+		puts ""
+		puts "  \[::dnssrv::tophost $fqdn\]"
+		puts "    [::dnssrv::tophost $fqdn]"
+		puts "\n-- \n"
+	}
+}
+
+if !$tcl_interactive main