line |
true |
false |
branch |
28
|
9 |
0 |
unless delete $args->{'results'} |
38
|
7 |
1 |
$string =~ s/^\s*([.\w-]*\w)// ? : |
41
|
3 |
5 |
$string =~ s/^\s*([0-9]+)// ? : |
50
|
3 |
9 |
if ($string =~ s/^\s*none//) |
58
|
0 |
9 |
unless $string =~ s/^\s*([\w-]*\w)// |
62
|
1 |
8 |
if ($string =~ s[^\s*/][]) |
64
|
1 |
0 |
if $string =~ s/^\s*([0-9]+)// |
68
|
9 |
0 |
if ($string =~ s/^\s*\=//) |
70
|
9 |
0 |
if $string =~ s/^\s*(\w+)// |
75
|
3 |
6 |
if ($comment) |
80
|
2 |
7 |
if ($string =~ s/\s*reason//) |
82
|
2 |
0 |
if ($string =~ s/\s*\=//) |
84
|
0 |
0 |
if $string =~ s/^\"([^"]*)\"// or $string =~ s/^\'([^']*)\'// or $string =~ s/^(\w+)// |
93
|
4 |
9 |
if $string =~ /^\s*\;/ |
95
|
8 |
1 |
$string =~ s/^\s*([\w-]+)// ? : |
99
|
8 |
0 |
if ($string =~ s/^\s*\.//) |
101
|
8 |
0 |
$string =~ s/^\s*([\w-]+)// ? : |
103
|
8 |
0 |
if ($string =~ s/^\s*\=//) |
106
|
0 |
8 |
unless $string =~ s/^\"([^"]*)\"// or $string =~ s/^\'([^']*)\'// or $string =~ s/^([\w\@.-]+)// |
115
|
8 |
0 |
if (defined $value) { } |
132
|
0 |
3 |
if $version != 1 |
138
|
1 |
2 |
if $r->{'method_version'} != 1 |
143
|
1 |
2 |
if defined $r->{'comment'} |
145
|
0 |
3 |
if (my $reason = $r->{'reason'}) |
151
|
10 |
2 |
unless index($prop, '.') > -1 |
160
|
1 |
2 |
unless @results |
186
|
9 |
2 |
@_ == 1 ? : |
187
|
0 |
11 |
unless $r->{'method'} and $r->{'result'} |