{loop $data $r}
• {sub_string($r[title],$titlelen)}
{end loop}