#	package require vfs

#	package require vfs::9p
	lappend auto_path tclDES-0.8
	source 9pvfs.tcl
	source p9sk1.tcl

	set sources [socket sources.cs.bell-labs.com 564]
	fconfigure $sources -translation  binary

	vfs::9p::Mount $sources axel /tmp sources.cs.bell-labs.com secret

	puts [glob [file join /tmp *]]