ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng)/ProfitPress-MegaCDROM2.B6I/TEXT/UTILITY/AWK320.ZIP/EURASIA.AWK

Text File | 1990-02-07 | 344 b | 12 lines

# accumulate the populations of Asia and Europe
# print these two totals at the end
# AKW p51

/Asia/   { pop["Asia"] += $3 }
/Europe/ { pop["Europe"] += $3 }
END      { print "Asian population is",
               pop["Asia"], "million."
           print "European population is",
               pop["Europe"], "million."
         }