time sensitive message (JAPH)

[harangzsolt33]

$a=.888*time>>24,$b=23,print map chr$b+ord,split//,qq(3*$a);