import System.Time
import System.Locale
import System.Posix.Env
main=do
putEnv("TZ=right/UTC")
interact$unlines.(>>= \s->[formatCalendarTime defaultTimeLocale "%Y-%m-%d %X".toUTCTime$TOD (case(read s::Integer)of;x|x>1230768022->x+1;x->x) 5]).lines