Oops sorry I misread your post.
Try:
sub {
my $tags = shift;
my $description = $tags->{Description};
$description = GT::CGI::html_escape($description);
$description = lc($description);
$description =~ s/\b(\w)/\U$1/g;
return $description;
}
Try:
sub {
my $tags = shift;
my $description = $tags->{Description};
$description = GT::CGI::html_escape($description);
$description = lc($description);
$description =~ s/\b(\w)/\U$1/g;
return $description;
}