line |
true |
false |
branch |
63
|
100 |
102 |
*{$_;}{'CODE'} ? :
|
67
|
0 |
202 |
*{$_;}{'CODE'} ? :
|
77
|
0 |
0 |
ref $_[0] ? :
|
83
|
0 |
0 |
@_ == 1 ? :
|
|
0 |
0 |
$meta->{'HAS_BUILDARGS'} ? :
|
88
|
0 |
0 |
unless exists $args->{'name'}
|
94
|
0 |
0 |
if (defined $args->{'name'})
|
96
|
0 |
0 |
unless ref \$args->{'name'} eq "SCALAR"
|
101
|
0 |
0 |
unless do {
|
113
|
0 |
0 |
if (exists $args->{'shim_name'})
|
119
|
0 |
0 |
if (defined $args->{'shim_name'})
|
121
|
0 |
0 |
unless ref \$args->{'shim_name'} eq "SCALAR"
|
127
|
0 |
0 |
unless do {
|
140
|
0 |
0 |
if (exists $args->{'source'})
|
142
|
0 |
0 |
unless &blessed($args->{'source'}) and $args->{'source'}->isa("Mite::Source")
|
148
|
0 |
0 |
if ref $self->{'source'}
|
155
|
0 |
0 |
exists $args->{'imported_functions'} ? :
|
157
|
0 |
0 |
unless do {
|
160
|
0 |
0 |
if (ref $value eq "HASH")
|
163
|
0 |
0 |
unless do {
|
166
|
0 |
0 |
if (defined $v)
|
167
|
0 |
0 |
unless ref \$v eq "SCALAR"
|
179
|
0 |
0 |
if (defined $k)
|
180
|
0 |
0 |
unless ref \$k eq "SCALAR"
|
186
|
0 |
0 |
unless do {
|
202
|
0 |
0 |
exists $args->{'imported_keywords'} ? :
|
204
|
0 |
0 |
unless do {
|
207
|
0 |
0 |
if (ref $value eq "HASH")
|
210
|
0 |
0 |
unless do {
|
213
|
0 |
0 |
if (defined $v)
|
214
|
0 |
0 |
unless ref \$v eq "SCALAR"
|
226
|
0 |
0 |
if (defined $k)
|
227
|
0 |
0 |
unless ref \$k eq "SCALAR"
|
233
|
0 |
0 |
unless do {
|
246
|
0 |
0 |
exists $args->{'arg'} ? :
|
249
|
0 |
0 |
unless $meta->{'BUILD'}
|
|
0 |
0 |
if not $no_build and @{[] unless $meta->{'BUILD'};}
|
256
|
0 |
0 |
if @unknown
|
266
|
0 |
162 |
unless $meta->{'BUILD'}
|
274
|
4 |
0 |
defined ${^GLOBAL_PHASE} ? :
|
278
|
0 |
4 |
unless $meta->{'DEMOLISH'}
|
285
|
0 |
0 |
if $e
|
367
|
116 |
0 |
if (defined $_[1])
|
368
|
0 |
116 |
unless ref \$_[1] eq "SCALAR"
|
374
|
0 |
116 |
unless do {
|
385
|
116 |
1564 |
@_ > 1 ? :
|
388
|
1549 |
15 |
exists $_[0]{'shim_name'} ? :
|
395
|
15 |
0 |
if (defined $default_value)
|
396
|
0 |
15 |
unless ref \$default_value eq "SCALAR"
|
404
|
0 |
15 |
unless do {
|
427
|
0 |
2 |
unless &blessed($_[1]) and $_[1]->isa("Mite::Source")
|
432
|
2 |
0 |
if ref $_[0]{'source'}
|
435
|
2 |
1208 |
@_ > 1 ? :
|
442
|
0 |
0 |
if exists $DOES{$role}
|
443
|
0 |
0 |
if $role eq "Mite::Package"
|