Branch Coverage

lib/MCP/Run/Compress.pm
Criterion Covered Total %
branch 30 50 60.0


line true false branch
64 6 3 if ($line =~ /^([d-])[rwx-]{9}\s+\d+\s+\S+\s+\S+\s+\d+\s+\w+\s+\d+\s+[\d:]+\s+(.+)$/u)
485 190 8 unless ($command =~ /$key/u)
490 1 7 if (my $detect = $filter->{'output_detect'})
493 0 1 unless ($has_match)
502 1 8 unless ($matched_filter)
509 0 8 if ($matched_filter->{'filter_stderr'})
510 0 0 if length $err
515 0 8 if ($matched_filter->{'strip_ansi'})
522 0 4 if ($out =~ /$match->{'pattern'}/u)
528 1 7 if ($matched_filter->{'transform'})
533 7 1 if (@{$matched_filter->{'strip_lines_matching'};})
538 15 302 if (/$pattern/u)
549 0 8 if (@{$matched_filter->{'keep_lines_matching'};})
554 0 0 if (/$pattern/u)
565 5 3 if ($matched_filter->{'truncate_lines_at'} > 0)
567 1 27 if (length $_ > $max) { }
568 0 0 if (length $_ > $max) { }
0 5 if length $err
572 0 8 if ($matched_filter->{'head_lines'} > 0) { }
0 8 elsif ($matched_filter->{'tail_lines'} > 0) { }
577 0 0 if ($omit > 0 and $tail > 0) { }
0 0 elsif ($omit > 0) { }
590 8 0 if ($matched_filter->{'max_lines'} > 0)
592 1 7 if (@out_lines > $matched_filter->{'max_lines'})
598 1 0 if (not length trim($out) and $matched_filter->{'on_empty'})