如何使用system cmd在perl中设置值

Question

我们可以在批处理文件中设置值，以便使用system cmd在Perl中实现相同的功能 我面临着下面一段代码的问题。 已经尝试过命令：

system("(set a=10) & echo %a%");

我期待打印第5页。

Answer 1

我对Windows批处理文件一无所知。但是从谷歌搜索：如果你把命令放在批处理文件cmd.bat：

@echo off
set a=10
echo %a%

然后从perl脚本执行

system('cmd.bat');

或许这不是你想要的？