$ perl -MDate::Simple=date -wle 'print date("1899-12-30") + 40254'
2010-03-17