Expected bytes received does not always match up

test-proc-stdin-to-proc-stdout.t

use v6;
use Test;

my $input = ("a" x 1000000).encode;

for 1..50 {
    my $proc = run «cat -», :in, :out, :bin;

    my $promise = start {
        $proc.in.write: $input;
        $proc.in.close;
    }

    await $promise;
    
    is $proc.out.slurp(:bin,:close).bytes, $input.bytes;
}

done-testing;

# Looks like you failed 15 tests of 50