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

  1. # accumulate the population for each region
  2. # AKW p51
  3.  
  4. BEGIN { FS = "\t" }
  5.       { pop[$4] += $3 }
  6. END   { for (name in pop)
  7.             print name, pop[name]
  8.       }
  9.