perl - perl 脚本中的 Shell 脚本

Question

我有一个运行良好的 perl 脚本，但后来我想在其中添加一些 shell 脚本。我试图谷歌，但我不知道确切的词。是嵌入式编程吗？所以这就是我所知道的。

我们可以像这样在 C 文件中编写汇编代码：

*****
C - code
int a=10;
char *p;
asm {       //here is the secondary or embedded language (assembly code)
assembly code...
ldaa 1;
push;
}

back to C...
print( "this works");

我只想按照这些思路做一些事情，但是以 perl 作为主要语言，shell 脚本作为辅助或嵌入式语言。

谢谢大家

Answer 1

这是你想要的？

$exec_string = <<EXEC;
echo this is my shell script
ls > tmp1
ls > tmp2
EXEC

system($exec_string)

EXEC可以用任何单词代替（例如 SHELL、SCRIPT 等）。