while $1
	if -w $1 then
		= f $1
	else
		if -w $1.mod then
			= f $1.mod
		else
			echo writable $1 not found
			goto next
		endif
	endif

	echo "\n\n\n$f:\n"
	mv $f ,$f
	admin -i,$f s.$f
	get s.$f
	ls -l $f ,$f s.$f

	: next
	shift
end
