# tests of ksh93-like dup-and-close redirection operators
exec 9<$0
f()
{
exec 5<$0
exec 0<&5-
while read line; do
echo "$line"
done
}
f
typeset -f f
# make sure it was closed
read -u 5 foo
echo after read
exec 5<&0
exec <&-
read abcde
exec 0<&9-
read line
echo $line