| blib/lib/Bundle/ToolSet.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 12 | 91.6 |
| line | true | false | branch |
|---|---|---|---|
| 45 | 10 | 47 | if $elem =~ /head1/i |
| 46 | 28 | 29 | unless $elem =~ /head1|Para/ |
| 52 | 1 | 67 | if ($MODE and $text =~ /^CONTENTS/i) |
| 58 | 63 | 4 | unless $MODE == 2 |
| 60 | 4 | 0 | if ($text =~ /\s* #padding ([\w:']+) #package \s* #padding (\d*(?:\.\d+)*)? #optional version (?: #optional comment (?: #"Comment" \s* #padding -\s+ #delimiter (?: #optional extensions \s* #padding (.*) #import ([+-]) #no? \s* #padding )? (.+)? #actual comment )? )? /x) |
| 87 | 3 | 1 | if ($1 eq lc $1) { } |