#!/bin/rc
rfork e
out=echo
post=(sed 's/(^[0-9]+)\.[0-9]+$/\1/')
flagfmt='n,l'
if (! ifs=() eval `{aux/getflags $*}) {
echo 'usage: '$0' [-nl] [seconds]' >[1=2]
exit usage
}
if (! ~ $flagn '')
out=(echo -n)
if (! ~ $flagl '')
post=cat
if (~ $#* 0)
secs=`{date -n}
if not
secs=$1
# julian day for unix epoch + time since unix epoch - tjd offset from julian day.
today=`{hoc -e '2440587.5 + ( '$secs' / ( 60*60*24)) - 2440000.5' | $post}
$out $today
|