@a = sort @a;
foreach (@a) { ... }