Perl 6使用字符串編碼

Question

有沒有辦法將string變量插入code？ 這就是我想要做的，當然它甚至不會編譯。

my $cmd = " + 5 "; 
my $a = 3; 

$a = $a { $cmd }; 
say $a; 

Answer 1

你可以嘗試使用EVAL，但請注意，使用EVAL是危險的，如果你沒有在那個將要計算的字符串完全控制（例如，考慮這樣的東西EVAL 'shell "rm -rf *"'）：

use MONKEY-SEE-NO-EVAL; 
my $cmd = " + 5 "; 
my $a = 3; 
$a = EVAL(EVAL '$a ~ $cmd'); 
say $a; 

輸出：

8 

注：

行$a = EVAL(EVAL '$a ~ $cmd')將串聯運算符合併到要評估的字符串中。如果沒有必要，你可以簡化爲$a = EVAL($a ~ $cmd)（如@ W4anD0eR96所示）