1#!/usr/local/bin/tclsh
2
3set CTMname src-cur
4set CTMref /u4/ftp/pub/FreeBSD/SRC-current/src
5set CTMdest /u4/ftp/pub/CTM
6set CTMprefix .
7set CTMdont {/CVS$|/CVS/Entries$|/CVS/Repository$|^secure|^eBones}
8set CTMmail ctm-src-cur
9
10set CTMcopy /u1/CTM/$CTMname
11set CTMtmp /u1/CTM/tmp/_tmp_$CTMname
12set CTMdate [exec date -u +%Y%m%d%H%M%SZ]