DIR="${PATH%%:*}"
test -z "${DIR}" && DIR=.

if ! [ -w "${DIR}" ] || ! [ -x "${DIR}" ]
then
	printf >&2 'Cannot use "%s" (from PATH[0]) for testing\n' "${DIR}"
fi
	

for name in ' ' '<' '$' '$1' '|' '`e`' '{' '()' '"' "'" \\
do
	Q=\'
	name_of_name=${name}
	case "${name}" in
	*\'*)	Q=\" ;;
	*\\*)	name_of_name=${name}${name};;
	esac
	eval "${Q}${name}${Q}() { printf $Q..${name_of_name}().. works %s\n$Q \"$*\"; }"

	printf ':%s: ' "${name}"
	case "${name}" in
	"'")	\' ok;;
	*)	eval "'${name}' ok";;
	esac

done