$i = 0;
while ($l = <STDIN>) { $a[$i++] = $l; }
print sort(@a);
