如何使用Perl 6运行外部程序？ （例如像Perl 5中的“system”）

Question

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

Answer 1

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

在Perl6中，shell将其参数传递给shell，类似于Perl 5＆＃39; 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 post on "running external programs"。

Answer 2

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

在我的Windows框中，它看起来像这样：

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