sub cart_settings { $id = param('id'); $sth = $dbh->prepare("SELECT id,name,parent,description,view_cats_prod FROM category WHERE id = '$id'"); $sth->execute or die $dbh->errstr; ($ided,$name,$parent,$des,$view) = $sth->fetchrow_array; print qq~
| Category | |
| Short Description | |
| ~; if($view eq "yes") { print qq~ ~; } else { print qq~ ~; } print qq~ | Have all of the categories products on this page |
$cat, settings has been updated
~; if($id) { print "Return to Manage Categories"; } else { print "Return to Manage Categories"; } }