__EOQ__
$colorheadingbg = "#000000";
open(LATEST,"frontpage.ptr");
$maincontent = "";
$publishedentry=;
close LATEST;
$daysToUse = 0;
$daysback = 0;
while($daysToUse < $weeks * 7){
$ymd = getYYYYdotMMdotDDforXDaysAgo($daysback++);
$cymd = $ymd;
$cymd =~ s/\.//g;
$cpub = $publishedentry;
$cpub =~ s/\.//g;
my $isPub = 0;
if($cymd <= $cpub){
$isPub = 1;
}
if($isPub || hasTumble($ymd)){
$maincontent .= tumbleEntry($ymd, $isPub);
$daysToUse++;
}
}
print $maincontent;
print "
";