sub {

my $tbl = $DB->table("Bookmark_Folders");
$tbl->select_options("ORDER BY RAND() LIMIT 5");

my $sth = $tbl->select( { my_folder_public => 1 } ) || die $GT::SQL::error;

my @loop;
while (my $hit = $sth->fetchrow_hashref) {
push @loop, $hit;
}

return { random_bookmark_folders_loop => \@loop };

}

<%get_random_folders%>
<%loop random_bookmark_folders_loop%>
<a href="<%config.db_cgi_url%>/bookmark.cgi?action=users_links;my_folder_id=<%my_folder_id%>"><%my_folder_name%>, by <%my_folder_user_username_fk%></a>
<%endloop%>