| line |
true |
false |
branch |
|
18
|
1 |
4 |
if (/\A(?:authors?|by)\z/) { }
|
|
|
1 |
3 |
elsif (/\Acopyright\z/) { }
|
|
|
1 |
2 |
elsif (/\Alicense\z/) { }
|
|
|
0 |
2 |
elsif (/\Arequire\z/) { }
|
|
|
0 |
2 |
elsif (/\Arecommend\z/) { }
|
|
|
0 |
2 |
elsif (/\Aprefer\z/) { }
|
|
47
|
0 |
6 |
unless defined $input and length $input
|
|
54
|
3 |
18 |
if $line =~ /^#/ or not $line =~ /\S/
|
|
55
|
9 |
9 |
if ($line =~ /\A\@([\w\-]+):\z/ or $line =~ /\A\[([\w\-]+)\]\z/) { }
|
|
63
|
0 |
9 |
unless defined $package
|
|
78
|
0 |
2 |
if (ref $input eq 'ARRAY') { }
|
|
|
1 |
1 |
elsif ($input =~ /\n/) { }
|
|
84
|
2 |
2 |
unless /\S/
|
|
101
|
2 |
2 |
if ($input =~ /\A\s*(\d{4})\s+(.+?)\s*\z/) { }
|
|
116
|
4 |
0 |
if ($license =~ /\APerl[\-_]?5/)
|