sub {
my $category = $DB->table('Category');
$category->select_options('ORDER BY Name');
my $sth = $category->select( ['Has_New_Links','Number_of_Links','Name','Full_Name'] );
my @cats;
while (my $cat = $sth->fetchrow_hashref) {
$cat->{URL} = "$CFG->{build_root_url}/" . $category->as_url($cat->{Full_Name}) . "/$CFG->{build_index}";
push @cats, $cat;
}
return { new_categories => \@cats };
}

<%tags%>
<%loop new_categories%>
<%if Number_of_Links > 50 or Has_New_Links eq Yes%>
<big>
<a href="/<%Full_Name%>"><%Name%></a>
</big>
<%if Number_of_Links < 50 or > 25%>
<a href="/<%Full_Name%>"><%Name%></a>
<%else%>
<small>
<a href="/<%Full_Name%>"><%Name%></a>
</small>
<%endif%>
<%endloop%>