in reply to
qw(0 st nd rd)[pop=~/(1?.)$/]or"th"
will do any integer.
Note that for pre-5.6 perl you have to do
because qw was translated into split' ','...' during compilation.
I make decisions, and my brain carries them out
My brain makes the decisions, and I observe them (if I'm lucky)
I make some decisions, and my brain makes others
My spouse makes decisions and I and my brain carry them out
I wrote a program to relieve me and my brain from the burden of decision-making
The black-helicopter people project the decisions into my brain and then I do as ordered
Results (484 votes),