cardinal golf

C. Abney cabney at ucsd.edu
Fri Feb 6 13:33:44 CST 2004


perl -le 'for(1..25){($b,$c)=reverse
split//;print$_,($b==1&&$c!=1?"st":$b==2&&$c!=1?"nd":$b==3&&$c!=1?"rd":"th")}'

Best I could do in a half hour (just for fun).

-- 
Charles Abney
Polymorphism Research Laboratory, 0603
UCSD School of Medicine
9500 Gilman Dr.
La Jolla, CA 92093-0603
-------------- next part --------------
A non-text attachment was scrubbed...
Name: not available
Type: application/pgp-signature
Size: 307 bytes
Desc: This is a digitally signed message part
Url : http://mail.pm.org/archives/san-diego-pm/attachments/20040206/e44932d8/attachment.bin


More information about the San-Diego-pm mailing list