multi_like \@array, [
    qr/regex1/,
    qr/regex2/,
    ....
], "Test name";

##</code><code>##

subtest "All lines are like expected" => sub {
    like $array[0], qr/regex1/;
    like $array[1], qr/regex2/;
    ....
    is scalar @array, $nnn, "No extra lines";
};