| line |
true |
false |
branch |
|
11
|
0 |
6 |
scalar @new == 1 ? : |
|
16
|
1 |
5 |
if ($args{'write_dir'}) |
|
18
|
1 |
0 |
unless (-d $args{'write_dir'}) |
|
21
|
2 |
6 |
unless -e ($dir .= "/$_") |
|
34
|
0 |
2 |
unless open my $fh, "<$css_file" |
|
41
|
1 |
0 |
exists $_[0]{'write_dir'} ? : |
|
48
|
0 |
2 |
unless open my $fh, '>', $_[0] |
|
55
|
0 |
5 |
unless $regx |
|
57
|
0 |
5 |
if !$_[2] =~ /\n$/u |
|
63
|
0 |
4 |
unless opendir my $dh, $_[1] |
|
67
|
0 |
4 |
unless my $spec = delete $files{'config'} |
|
85
|
30 |
205 |
if (not exists $arg{'value'} and $arg{'buffer'} =~ /\s/u) |
|
86
|
15 |
190 |
if (not $arg{'flag'} || $arg{'multi'} and $arg{'buffer'} eq ':') |
|
87
|
15 |
175 |
if ($arg{'buffer'} eq $arg{'end'}) |
|
94
|
16 |
159 |
if (exists $arg{'flag'} and not exists $arg{'value'}) |
|
95
|
0 |
16 |
if $arg{'buffer'} =~ /\s/u |
|
96
|
1 |
15 |
if ($arg{'buffer'} =~ m([\@\$\^\&\*\{/\\\~\`\>\<\+\_\]\[\?\|\"\'\=\!])u) |
|
102
|
97 |
77 |
exists $arg{'flag'} ? : |