url=http://www.tcl.tk/

port_getver() {
	fetch \
	| grep Source \
	| sed "s/.*Tk //;s/<.*//"
}