On Thursday, June 6, Marc Chantreux wrote:
> my $p = run 'cat', '-n', in => $*OUT, :out;
> $*OUT.say for < i bet on you, raku >;
> $*ERR.say: $p.out.slurp;
>
> my $p = run 'cat', '-n', in => "/dev/stdout", :out;
> $*OUT.say for < i bet on you, raku >;
> $*ERR.say: $p.out.slurp;
>
> my $o2 = $*OUT.clone;
> my $p = run 'cat', '-n', in => $o2, :out;
> $o2.say for < i bet on you, raku >;
> $*ERR.say: $p.out.slurp;
Something like this?
my $p = run 'cat', '-n', :in, :out;
$p.in.say($_) for <i bet on you raku>;
$p.in.close;
say $p.out.slurp;
which produces
1 i
2 bet
3 on
4 you
5 raku
