I am getting errors. Can you show me how to put this code my @long_enough = grep length > 2, @exploded;
in here:
my $tags = GT::Template->tags;
my $cat = $tags->{category_name};
$cat =~ s|/|,|g;
my $sub_cat = join(",", map { join(",", split(/\//, $_->{Full_Name})) } @{$tags->{category_loop}});
my $keywords = $cat;
$keywords .= $sub_cat if $sub_cat;
return lc $keywords
}
Thanks,
Blackbird
in here:
Code:
sub { my $tags = GT::Template->tags;
my $cat = $tags->{category_name};
$cat =~ s|/|,|g;
my $sub_cat = join(",", map { join(",", split(/\//, $_->{Full_Name})) } @{$tags->{category_loop}});
my $keywords = $cat;
$keywords .= $sub_cat if $sub_cat;
return lc $keywords
}
Thanks,
Blackbird