Thanks Alex but I need to short description for <%Title%> tag, I've used this code but it repeat two times title:
sub { my $tags = shift; my $desc = $tags->{Title} or return ""; length $desc < 10 and return $desc; my $short = substr ($desc, 0, 300); $short =~ s/\s\S+?$//; $short .= " ......"; return $short;}
How I can Do it?
Thanks in advance
Bye From Italy
Fabio
Fabio
sub { my $tags = shift; my $desc = $tags->{Title} or return ""; length $desc < 10 and return $desc; my $short = substr ($desc, 0, 300); $short =~ s/\s\S+?$//; $short .= " ......"; return $short;}
How I can Do it?
Thanks in advance
Bye From Italy
Fabio
Fabio