docgen/docgen.sh

   1 #!/bin/bash
   2
   3 area=$1
   4
   5 while read p; do
   6   section=`echo ${p//[[:blank:]]/} | tr '[:upper:]' '[:lower:]'`
   7
   8   section=`echo $section | cut -d'/' -f1`
   9
  10   echo "   $p <${area}/${section}>" >> ${area}.rst
  11   echo $p > ${area}/${section}.rst
  12
  13   N=${#p}
  14   myvar=`perl -e "print '=' x $N;"`
  15   echo $myvar >> ${area}/${section}.rst
  16 done <${area}.list