Может ли моя программа Perl выполнять код, хранящийся в базе данных?

Question

Возможно ли сохранить некоторый код Perl в базе данных, а затем извлечь его с помощью оператора select и выполнить этот код Perl? Я пробовал использовать eval, но это не работает.

Вот что я хочу прямо сейчас, и это не похоже на работу:

my $temp = $qryResults[0]; 
print $temp."\n"; 
eval{"$temp"}; 

выход $con->Disconnect();exit;

Answer 1

Вам просто нужно:

eval $temp; 

Причина ваша версия не работает из-за блок форму Eval его оценки, как если бы вы написали простую строка:

eval{"perl code here"} 

является как писать эту строку perl:

"perl code here" 

Это не код, его строка. Форма блока определяет, что внутри блока. Если строка внутри блока, это просто строка, а не сценарий. Строка формы показывает, что внутри строки.

Answer 2

я понял это; если я удалю фигурные скобки, то это сработает.