#          1         2         3         4         5
# 123456789012345678901234567890123456789012345678901
  print sort{($x,$y)=(split(":",$a.$b))[2,8];$y-$x}<>