.bra {
.ket }

;
; call me once a week, right after calc_traffic_daily, for
; weekly statistics
;
cd uucp:traffic

failat 30

touch xferstat.mon xferstat.tue xferstat.wed
touch xferstat.thu xferstat.fri xferstat.sat xferstat.sun

type    >XFerStat.week XFerStat.Mon
type   >>XFerStat.week XFerStat.Tue
type   >>XFerStat.week XFerStat.Wed
type   >>XFerStat.week XFerStat.Thu
type   >>XFerStat.week XFerStat.Fri
type   >>XFerStat.week XFerStat.Sat
type   >>XFerStat.week XFerStat.Sun

if exists uucp:c/uuacct
  uuacct >Traffic.week uucp:traffic/XFerStat.week
endif

delete Traffic.???
delete XFerStat.???

failat 10

