home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Simtel MSDOS - Coast to Coast
/
simteldosarchivecoasttocoast2.iso
/
awk
/
awk320.zip
/
EURASIA.AWK
< prev
next >
Wrap
Text File
|
1990-02-08
|
344b
|
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."
}