How to get the result of `--- init` data section?

Suppose I have a block look like this:

```
=== TEST 2: test init
--- init
    my $file = glob('compose.txt') ;
    my @cmd = ("docker", "compose", "-f", $file, "ps") ;
    system(@cmd) ;
```

How do I capture the output of `system()`?