Hi Laura,
Did the mod sugegsted :
sub {
my $tags = shift;
if ($tags->{Category_Image}){return $tags->{Category_Image};}
else {
my $cat = $tags->{Full_Name};
$cat =~ s,^([^/]+)/.*$,$1,;
my $cat_db = $DB->table('Category');
my $image = $cat_db->select ( { FatherID => 0, Full_Name => $name}, ['Category_Image'] )->fetchrow_array;
return $image;
}
}
with
<%get_cat_image> inserted in category.html
I'm getting this error mesage :
Unable to compile 'get_cat_image': Global symbol "$name" requires explicit package name at (eval 24) line 8.
Significant Media
Did the mod sugegsted :
sub {
my $tags = shift;
if ($tags->{Category_Image}){return $tags->{Category_Image};}
else {
my $cat = $tags->{Full_Name};
$cat =~ s,^([^/]+)/.*$,$1,;
my $cat_db = $DB->table('Category');
my $image = $cat_db->select ( { FatherID => 0, Full_Name => $name}, ['Category_Image'] )->fetchrow_array;
return $image;
}
}
with
<%get_cat_image> inserted in category.html
I'm getting this error mesage :
Unable to compile 'get_cat_image': Global symbol "$name" requires explicit package name at (eval 24) line 8.
Significant Media