# !/bin/csh -f
#
if ("$*" == '') then
  echo '  clean: for cleaning the classlist from the registration Email'
  echo '  clean will delete the mail head and reformat the classlist in a form'
  echo '  sutiable for either excel or Wingz.'
  echo " "
  echo '  Usage: clean <class_list>'
  echo '  the cleaned file is written on <class_list>.new'
  echo " "
  exit(-1)
endif

/bin/sed -e '1,$s/[ ]\{10\}\"/\"/g;1,$s/\"\,\"/	/g;1,$s/\"//g;\
   /Date Produced: /p;1,/Date Produced: /d; /College: /d;\
   /Department: /d;/Min. Credits/d;/Max. Credits/d;\
   /Time-Days-Loctn2/d;/Time-Days-Loctn3/d;/Instructor 3/d;\
   /Instructor 4/d; /ID \#/s/ \#/-Number/; /ID-Number/s/Last/Last-Name/;\
   /ID-Number/s/First/First-Name/; /ID-Number/s/Email/Email-Address/' $*\
       >$*.new
/bin/chmod go= $*.new
fs setacl . system:anyuser none