Cheers..

It appears to me that the perl functions time and localtime are intrinsics, not in any particular module, so you could use those. I would use them to figure out what day of the week it is and use that information to see if you need to reset the results.

Something like:

my @time_struct;
my $time_int;

$time_int = time();
@time_struct = localtime($time_int);

if (($poll_end_day + 1) == $time_struct[7])
{
   #need to reset $poll_end_day in here
   clear_results();
}
[download]

Check out the documentation on time and localtime.

Ben