qse/ase/cmd/awk/cou-027.out
2008-03-21 22:17:04 +00:00

19 lines
259 B
Plaintext

BEGIN {
FS = " ";
}
{
pop[$4] += $3;
}
END {
for (c in pop)
printf ("%15s %6d\n",c,pop[c]) | "sort -t' ' -k2 -rn";
close ("sort -t' ' -k2 -rn");
sleep (1);
}
Asia 2173
North America 340
Europe 172
South America 134