Spi*_*ros 3 perl datetime date
我试图找出一种方法来计算记录的出生年份,在给定日期给出两位小数的年龄 - 在Perl中.
为了说明这个例子,考虑以下两个记录:
date, age at date
25 Nov 2005, 74.23
21 Jan 2007, 75.38
我想要做的是根据这些记录获得出生年份 - 从理论上讲,它应该是一致的.问题在于,当我尝试通过计算日期字段中年份与年龄之间的差异来推导它时,我遇到了舍入错误,导致结果看起来错误,而实际上它们是正确的.
我尝试使用int()或sprintf()的一些"聪明"组合来解决问题,但无济于事.我看过Date :: Calc但是看不到我能用的东西.
ps由于许多日期是在1970年之前,我不能不幸地使用UNIX纪元.
| 归档时间： |
|
| 查看次数： |
1776 次 |
| 最近记录： |