Something like:
my $vars = GT::Template->vars;
my $title = $vars->{title_loop};
return unless ref $title eq 'ARRAY';
my @reversed = reverse @$title;
# Remove Home
pop @reversed;
return join("/", map { $_->{Name} } @reversed);
}
Adrian
Code:
sub { my $vars = GT::Template->vars;
my $title = $vars->{title_loop};
return unless ref $title eq 'ARRAY';
my @reversed = reverse @$title;
# Remove Home
pop @reversed;
return join("/", map { $_->{Name} } @reversed);
}
Adrian