timegm(0,0,0,$day,$month,$year)

##</code><code>##

    timegm( Math::BigInt->new(0), Math::BigInt->new(0),
        Math::BigInt->new(0), $day, $month, $year )