home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / CLIPPER / MISC / AWK210.ZIP / DEARC.AWK < prev    next >
Encoding:
Text File  |  1988-06-07  |  123 b   |  11 lines
  1. $1=="-ARCHIVE-" {
  2.     if (file)
  3.         close(file)
  4.     file = $2
  5.     print file
  6.     next
  7. }
  8. {
  9.     print > file
  10. }
  11.