1 10 11 ... 2 20 21 22 ... 3 30 31 32 33 #### C:\test>perl -anle"$h{ $F[1] } = sprintf qq[%05u%s], $., $_; }{ print for sort values %h" 1/2/2013 cgoo nreuiheru 1/4/2013 doow reiqrqueih 1/5/2013 hellio ruieqrhfuepqh 1/20/2013 cgoo 3rhquh4ureyh 1/30/2013 yetil jerqohgqrij 2/13/2013 hellio rueqipheruh 2/14/2013 cgoo wehrig4r74378 ^Z 000021/4/2013 doow reiqrqueih 000051/30/2013 yetil jerqohgqrij 000062/13/2013 hellio rueqipheruh 000072/14/2013 cgoo wehrig4r74378