Select Code to Download

C:\test>perl -anle"$h{ $F[1] } = $_; }{ print for values %h"
1/2/2013     cgoo     nreuiheru
...
1/4/2013     doow    reiqrqueih
2/13/2013    hellio   rueqipheruh
2/14/2013    cgoo    wehrig4r74378

C:\test>perl -anle"$h{ $F[1] } = sprintf qq[%05u%s], $., $_; }{ print 
+substr $_, 5 for sort values %h"
1/2/2013     cgoo     nreuiheru
...
1/30/2013    yetil     jerqohgqrij
2/13/2013    hellio   rueqipheruh
2/14/2013    cgoo    wehrig4r74378