#!/usr/local/bin/perl

chdir("/nameserv");
$wkday = ("Sat","Sun","Mon","Tues","Wed","Thurs","Fri")[(localtime)[6]];
rename("log","log.$wkday");
open(LOG,">log");
$spid = `cat /etc/syslog43.pid`;
chop($spid);
kill 'HUP',$spid;
system("/nameserv/bin/nsstats log.$wkday | /usr/ucb/Mail -s 'qi report' cso-maint-ml@ux1.cso.uiuc.edu");
