time-60*60*(12+(localtime)2)

##</code><code>##

($d, $m, $y) = (localtime(X))3,4,5;