Dates in Latin

I'm getting married on June 20th. Leïla and I chose this date because it's my birthday. It's my birthday because I was born on Dies Martis xx Junius MCMLXVII, as calculated by:

use Roman;
sub latin_date {
    my $datetime = shift;
    my @days     = (
        'Dies Dominica',
        'Dies Lunae',
        'Dies Martis',
        'Dies Mercurii',
        'Dies Iovis',
        'Dies Veneris',
        'Dies Saturni',
        'Dies Dominica',
    );
    my @months = (
        'Januarius', 'Februarius', 'Martius',   'Aprilis',
        'Maius',     'Junius',     'Julius',    'Augustus',
        'September', 'October',    'Novembris', 'December'
    );
    return join ' ' => $days[ $datetime->day_of_week ],
      roman( $datetime->day ), $months[ $datetime->month - 1 ],
      uc( roman( $datetime->year ) );
}

I pulled the Latin information from this page about Roman dates.

5 Comments

Ovid, you missed the perfect opportunity to do that in Lingua::Romana::Perligata. :-)

Oh, and congratulations.

gizmo

"I'm getting married on June 20th."

Congratulations :)

I think Caesar would disagree. The old-school Latin designation for the 20th of June would be (I think) "a.d. XII Kal. Jul.", literally "12 days before the Kalends of July". I never did get along with that particular scheme...

And, of course, gratulor tibi de felicia tua. =)

If you're going to use Latin, then the year is MMDCCLXIII (AUC).

Good catch :)

Congrats Ovid.

Leave a comment

About Ovid

user-pic Freelance Perl/Testing/Agile consultant and trainer. See http://www.allaroundtheworld.fr/ for our services. If you have a problem with Perl, we will solve it for you. And don't forget to buy my book! http://www.amazon.com/Beginning-Perl-Curtis-Poe/dp/1118013840/