set y=$1 cd $1 /usr/man/man0/secindex .| sed ' s/\(.*\) \(.*\)\.\(.*\)/\1.\3 \2.\3/ ' | while x="`read`" case $x in "") break esac do set $x if test ! -f $1 then ln -s $y/$2 $1 fi done