Friday, 4 December 2009

A special Date, a special someone.

perl -MDateTime -E 'our $first_kiss = DateTime->new( year => 2007, month => 3, day => 10 ); say $first_kiss->delta_days( DateTime->now )->delta_days'

1000



Talk about serendipity, finding out about this 3 days before the actual date!

Taking her to dinner now ;-)

4 comments:

  1. Oh, and if you're wondering about your own (and potentially several others) special dates, remember DateTime is your friend. For instance, this is what I did to figure it out beforehand:

    perl -MDateTime -E 'say DateTime->new(
    year => 2007, month => 3, day => 10)->add( days => 1000 )'

    2009-12-04T00:00:00

    ReplyDelete
  2. The most romantic blog post about perl :)

    ReplyDelete
  3. Thanks guys! Dinner was great and she loved the surprise (I kept quiet, of course). She was all mellow when I told her and today I actually caught her bragging about it to some of her friends :-)

    ReplyDelete