sub List_Links {

my ($sort_order,$limit) = (shift,shift);
my @fields_to_sort = @_;

$sort_order ||= "Title ASC";

my $tbl = $DB->table('Links');
if (defined $limit) {
$tbl->select_options(qq|ORDER BY $sort_order LIMIT $limit|);
} else {
$tbl->select_options(qq|ORDER BY $sort_order|);
}

my $cond = new GT::SQL::Condition;
foreach (@fields_to_sort) {
my ($field,$operator,$val) = split /::/;
$cond->add($field,$operator,$val);
}
$cond->bool('AND');

my $sth = $tbl->select( GT::SQL::Condition->new($field,$operator,$val) ) || die $GT::SQL::error;

my @loop;
while (my $hit = $sth->fetchrow_hashref) {
$hit = Links::SiteHTML::tags('link', $hit);
push @loop, $hit;
}

return { cond_loop_link => \@loop }

}

<%Plugins::ULTRAGlobals::List_Links('Title ASC',10,'isValidated::=::Yes','Foo::LIKE::%bar%')%>

isValidated => Yes
Foo LIKE '%bar%'

'Foo::=::bar','Test::<=::5'