clients/userreg/register

   1 #!/bin/csh -f
   2 reset
   3 while (1)
   4         /mit/register/userreg.`/bin/athena/machtype`
   5         reset
   6         echo -n "Do you want to register another user? "
   7         set answer = $<
   8         if ("${answer}x" =~ [nN]*) exit 0
   9 end