在Perl腳本上使用另一個解釋器運行代碼

Question

This thread討論了從Bash腳本內運行Python代碼的方法。

有什麼辦法可以在Perl腳本中做類似的事情嗎？即有什麼辦法可以運行在Perl腳本上鍵入的Python代碼？請注意，我並不是要求從Perl腳本運行Python 文件。我詢問的是如何在具有Perl腳本的同一文件中直接鍵入運行Python代碼（與其他線程討論如何運行Bash腳本的Perl代碼的方式相同）。

例子：

# /bin/perl 
use 5.010 
my $some_perl_variable = 'hello'; 


# ... BEGIN PYTHON BLOCK ... 
# We are still in the same file. But we are now running Python code 
import sys; 
print some_perl_variable # Notice that this is a perl variable 
for r in range(3): 
    print r 
# ... END PYTHON BLOCK ... 

say "We are done with the Perl script!" 
say "The output of the Python block is:" 
print $output" 
1; 

應打印：

We are done with the Perl script! 
The output of the Python block is: 
hello 
1 
2 
3 

我們正在與perl腳本

Answer 1

這聽起來像你會對Inline模塊感興趣。它允許Perl以許多其他語言調用代碼，並依賴於每種語言的支持模塊。

你不說你想做什麼，但是你提到Python並且有一個Inline::Python。

Answer 2

是，相同的技術完成（這裏-文檔）可用於Perl的。

的Perl在擊：

perl <<'END' # note single quotes to avoid $variable interpolation 
use 5.010; 
say "hello world"; 
END 

或

perl -E'say "hello from perl"' 

擊在Perl：

use autodie; # less error handling 
open my $bash, "|-", "bash"; 
print $bash <<'END'; # single quotes again 
echo hello from bash 
END 

的Perl在擊在Perl：

use autodie; # less error handling 
open my $bash, "|-", "bash"; 
print $bash <<'END'; # single quotes again 
perl <<'INNER_END' 
use 5.010; 
say "hello inception"; 
INNER_END 
END 

（我在命令行上諷刺地測試過，在另一個heredoc中）