in reply to Date Calculation

Call me Mr States-the-obvious, but how about the module Date::Business?

($_='kkvvttuu bbooppuuiiffss qqffssmm iibbddllffss')
=~y~b-v~a-z~s; print

In Section Seekers of Perl Wisdom