Jak mogę wykonać zewnętrzne polecenie i przechwycić jego dane wyjściowe w Perl6?Jak wykonać polecenie zewnętrzne i przechwycić jego dane wyjściowe w perl6?
perl5 stylu back-kleszcze nie wydają się działać:
> my $results = `ls`;
Confused at line 1, near "my $results"
Synopsis 16 dokumentuje run metody, ale to zwraca status wyjścia, a nie wyjście z stdout.
Używam realizacji Rakudo (rakudo-star-2010.12).
Zastosowanie qqx lub qx zamiast np:
> my $results = qqx{ls};
Larry ścienna answered równoważny pytanie na listę mailingową:
[...]
: Co zastępuje lewy apostrof lub qx {}?
qqx [] lub qq: x [] byłby dokładnym odpowiednikiem . qx [] lub q: x [] będzie to to samo z semantyką pojedynczego cytatu. (Prawdopodobnie istnieje żaden backticks dla tego celu, ponieważ jesteśmy zastrzegając ` dla zdefiniowanego przez użytkownika rzeczy, a ponieważ backticks są wizualnie trudno powiedzieć z apostrofami w wielu czcionek.)
ten może być również wykonane w sposób bezpieczny (nie dotykając shell) z użyciem run() parametrem out:
my $proc = run 'ls', q!/tmp/"This" is an ugly name, isn't it?/!, :out;
my $output = $proc.out.slurp-rest;
Więcej szczegółów dostępnych w Proc class.
Znalazłem odpowiedź tuż przed opublikowaniem pytania, ale mimo to opublikowałem je na wypadek, gdyby było przydatne dla innych. – mattbh