Branch Coverage

blib/lib/Perl/Meta.pm
Criterion Covered Total %
branch 6 6 100.0


line true false branch
62 6 10 unless my $license_text = shift()
94 10 33 if ($license_text =~ /\b$pattern\b/i)
103 2 1 if ($_[0] =~ / ^\s* (?:use|require) \s* v? ([\d_\.]+) \s* ; /imsx) { }