home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS - Coast to Coast / simteldosarchivecoasttocoast2.iso / awk / awk320.zip / SPLIT.AWK < prev    next >
Text File  |  1990-02-08  |  216b  |  8 lines

  1. # split a string into separate fields in an array
  2.  
  3. BEGIN {
  4.         xsplit("i j k", a); for (i in a) print i, a[i]
  5.         xsplit("x y z", a); for (i in a) print i, a[i]
  6. }
  7. function xsplit(x, y) { split(x, y) }
  8.