home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_disks / 300-399 / ff319.lzh / CNewsSrc / cnews.orig.lzh / relay / sh / tear < prev   
Text File  |  1989-06-27  |  528b  |  26 lines
  1. #! /bin/sh
  2. # tear prefix [file...] - tear RFC822 header and body apart
  3. #    output files are $1hdr and $1body
  4. PATH=/bin:/usr/bin; export PATH
  5.  
  6. case $# in
  7. 0)
  8.     echo "usage: tear prefix [file...]" >&2
  9.     exit 1
  10.     ;;
  11. esac
  12.  
  13. hdr="$1hdr"
  14. body="$1body"
  15. shift
  16.  
  17. >>$hdr                    # create files just in case
  18. >>$body
  19. case $# in
  20. 0)    args="-" ;;    # awk needs a filename due to cmd. line assignments
  21. *)    args="$@" ;;
  22. esac
  23. exec awk 'inbody == 0 && $0 ~ /^([ \t]|[^ \t]*:)/ { print >hdr; next }
  24.                     { inbody = 1; print >body }
  25. ' hdr="$hdr" body="$body" $args
  26.