perl - 如何使用 Perl 6 运行外部程序？（例如 Perl 5 中的“系统”）

Question

我可以system在 Perl 5 中使用来运行外部程序。我喜欢把systemPerl 想象成一个微型的“Linux 命令行”。但是，我在 Perl 6 中找不到文档system。什么是等效的？

Answer 1

Perl6 实际上有两个system从 Perl 5 替换的命令。

在 Perl6 中，shell将其参数传递给 shell，类似于 Perl 5 system，当它有一个包含元字符的参数时。

在 Perl6 中，run尽量避免使用 shell。它将其第一个参数作为命令，其余参数作为该命令的参数，类似于 Perl 5 的system当它有多个参数时。

例如：

shell('ls > file.log.txt');   # Capture output from ls (shell does all the parsing, etc)

run('ls','-l','-r','-t');     # Run ls with -l, -r, and -t flags
run('ls','-lrt');             # Ditto

另请参阅这篇关于“运行外部程序”的 2014 Perl 6 Advent 帖子。

Answer 2

除了使用shellor run（从 Perl 5 替换）之外system，您还可以使用NativeCall来调用 libcsystem函数。

在我的 Windows 机器上，它看起来像这样：

use NativeCall;
sub system(Str --> int32) is native("msvcr110.dll") { * };
system("echo 42");