perl -ple'$_.=(!/1?.$/,st,nd,rd)[$&]||th'