Hello everybody
i am so stupid
i want to use following global but i don't know how to get the Full_Name
sub {
my $output;
my $cat_db = $DB->table('Category');
my $cat_id = $_[0];
$cat_db->select_options('ORDER BY Full_Name');
my $sth = $cat_db->select ( {'Name' => $cat_id}, ['ID','Full_Name','Name'] );
while (my ($id,$cat,$heading) = $sth->fetchrow_array) {
my $linkdb = $DB->table('Links','CatLinks');
my $url = $cat_db->as_url($cat);
$output .= qq~$heading (<a href="/$url">FULL_NAME</a><br>)~;
}
return $output;
}
please help me again
Marina
i am so stupid

i want to use following global but i don't know how to get the Full_Name
sub {
my $output;
my $cat_db = $DB->table('Category');
my $cat_id = $_[0];
$cat_db->select_options('ORDER BY Full_Name');
my $sth = $cat_db->select ( {'Name' => $cat_id}, ['ID','Full_Name','Name'] );
while (my ($id,$cat,$heading) = $sth->fetchrow_array) {
my $linkdb = $DB->table('Links','CatLinks');
my $url = $cat_db->as_url($cat);
$output .= qq~$heading (<a href="/$url">FULL_NAME</a><br>)~;
}
return $output;
}
please help me again
Marina
