@off = @{$class{'off'}} if ($class{'off'});
for($today = ($today > $firstday ? $today : $firstday); $today < $lastday; $today++) {
next unless(grep($_ == Day_of_Week($today->date), @days));
- next if(grep($_ == $today, @off));
+ print "$today\n";
+ next if(grep($_ == "$today", @off));
return $today;
}
$today = Date::Calc->new(Date::Calc->gmtime->date);
for($today = ($today < $lastday ? $today : $lastday); $today > $firstday; $today--) {
next unless(grep($_ == Day_of_Week($today->date), @days));
- next if(grep($_ == $today, @off));
+ next if(grep($_ == "$today", @off));
return $today;
}
return undef;