gno/usr.bin/awk/tests/ch2p47.awk
tribby ddb82cb2e0 Remaining files for awk 2.0 that were left out of the previous checkin.
Maybe someday I'll become adept at using cvs...
1998-04-07 17:06:53 +00:00

8 lines
238 B
Awk

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