#!/bin/rc

clonefile = /net/tcp/clone
server = $1

<[4] $clonefile {

	netdir=`{basename -d $clonefile} ^ / ^  `{cat /fd/4}
	
	echo connect $server to $netdir/ctl
	echo connect $server >$netdir/ctl || exit 'cannot connect'

	cat > $netdir/data
	
	cat $netdir/data
}

# echo 'GET http://192.168.1.100 HTTP/1.0 \
' | /usr/matt/bin/rc/poster.rc 192.168.1.100!80