perl -wle '@a=(1..2_000_000); @b=sort map {scalar gmtime $_} @a; print "@b[0,1,2,1_999_997,1_999_998,1_999_999]"'

##</code><code>##

Fri Jan  2 00:00:00 1970 Fri Jan  2 00:00:01 1970 Fri Jan  2 00:00:02 1970 Wed Jan 21 23:59:57 1970 Wed Jan 21 23:59:58 1970 Wed Jan 21 23:59:59 1970
34.42user 0.32system 0:35.76elapsed 97%CPU (0avgtext+0avgdata 29949952maxresident)k
0inputs+0outputs (122789major+0minor)pagefaults 0swaps