map { s/^\s+//; s/\xa0|\r//g; s/\n/<br \/>/g; $_} @$row;
$row->[1] = capitalize($row->[1]);
$row->[1] =~ s/&/&/g;
+ $row->[0] =~ s/Cumulative through/Cumulative: through/;
+ $row->[0] =~ s/Cumulative:(.*) (\d{4}) (.*)/Cumulative:\1 \3 \2/;
$lastrow=$row;
- next if $row->[0] =~ /:|Current Term|Cumulative/;
+ next if $row->[0] =~ /:|Current Term/;
print '<tr class="'.$shade.'">';
$shade = ($shade eq "dark"?"light":"dark");
print '<td align="left" class="sectionid">', $$row[0], '</td>';