BEGIN {
FS = " ";
}
{
pop[$4] += $3;
END {
for (name in pop)
print name,pop[name];
Europe 172
South America 134
North America 340
Asia 2173