Select Code to Download

use strict;
use warnings;
...
    return 1 unless $year % 400;
    return 0;
}

================================================
$t  - 1194172762 - Sun 2007-11-04.10:39:22 +0000
...
$t1 - 1167609600 - Mon 2007-01-01.00:00:00 +0000
$t2 - 1199145599 - Mon 2007-12-31.23:59:59 +0000
================================================