(Mostly stolen from peterS in #perl at freenode.net)sub suffer { local $_ = shift; my$suf = 'th'; if( !/1.$/ ) { $suf = 'st' if /1$/; $suf = 'nd' if /2$/; $suf = 'r +d' if /3$/ } return $_.$suf; }
In reply to Re: POSIX strftime format question
by BUU
in thread POSIX strftime format question
by geektron
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |