That seems like wayyyy too much work.

my $now = time;
my @now = localtime $now;
my $start_of_today = $now - $now[0] - 60 * $now[1] - 3600 * $now[2];
my $days_since_monday = ($now[6]+6) % 7;
my $start_of_monday = $start_of_today - 86400 * $days_since_monday;
[download]

Now $start_of_monday is the epoch time for the nearest monday morning before now. Just show the ones since then.

This fails around a DST switchover, but only by being an hour too much or too little. No biggy if you aren't publishing press releases sunday night at midnight. {grin}

-- Randal L. Schwartz, Perl hacker