You could whip one up yourself using Date::Manip. See http://search.cpan.org/~sbeck/Date-Manip-5.48/Manip.pod and look at ParseDate( ) in particular. You can use it to parse a wide range of date formats into something easy to crunch (you may also appreciate unixdate( ) from the same package). Then, use your favorite conditional logic tom-fooleration method to figure out whether the date is today's, yesterdays, tomorrows, or some other date (use localtime() with no arguments to get today's date and time... there is certainly another way, and probably a better one to do that..) and return whatevah you want. So fun! So easy! So custom! Now if I could just learn to make my own shirts...