$time = localtime(time);
@rad = split(/ /,$time);
@time = split(/:/,@rad[3]);
$rad = @time[2]*7;
