home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / X / mit / util / patch / myread < prev    next >
Encoding:
Text File  |  1988-08-30  |  238 b   |  19 lines

  1. ans='!'
  2. while expr "X$ans" : "X!" >/dev/null; do
  3.     read ans
  4.     case "$ans" in
  5.     !)
  6.     sh
  7.     echo " "
  8.     echo -n "$rp "
  9.     ;;
  10.     !*)
  11.     set `expr "X$ans" : "X!\(.*\)$"`
  12.     sh -c "$*"
  13.     echo " "
  14.     echo -n "$rp "
  15.     ;;
  16.     esac
  17. done
  18. rp='Your answer:'
  19.