Я хочу запустить merging3.pl. но всегда есть такие ошибки:
Глобальному символу "$ new_cat_id" требуется явное имя пакета в строке merging3.pl 2
51.
Глобальный символ "$ new_cat_id" требует явного имени пакета в строке merging3.pl 2
65.
Выполнение merging3.pl прервано из-за ошибок компиляции.
Это части моего merging3.pl
# Получить фасеты / категории
my $ query_local1 = "SELECT id, category_name FROM category";
my $ query_local2 = "WHERE id = $ new_cat_id AND удалено = 0";
мой $ query_local = $ query_local1. $ query_local2;
мой $ query_handle_local = $ connect-> prepare ($ query_local);
$ Query_handle_local-> Execute ();
my ($ lid, $ lname);
$ query_handle_local-> bind_columns (\ $ lid, \ $ lname);
while ($ query_handle_local-> fetch ()) {
# print "local name= "."$lname\n";
#if name composite with a slash, take only first word
$lname =~ s/\/[^\/]*//;
# Get global facets/categories
my $query_global = "SELECT id, category_name FROM category WHERE id=our $new_cat_id AND deleted=0";
my $query_handle_global = $connect->prepare($query_global);
$query_handle_global->execute();
Спасибо и очень признателен!