| line |
true |
false |
branch |
|
74
|
3 |
1 |
if (@args > 0) |
|
76
|
1 |
2 |
if $_ eq ':Debug' |
|
79
|
1 |
2 |
if $_ eq ':Class' |
|
109
|
0 |
0 |
if (@_ < 2) { } |
|
143
|
1 |
0 |
if (scalar @_ > 2) { } |
|
158
|
1 |
0 |
if (not exists $$Subs{$sub}) |
|
180
|
1 |
0 |
if (scalar @_ > 1) { } |
|
190
|
0 |
1 |
unless (exists $$Subs{$sub}) |
|
203
|
0 |
0 |
if (scalar @_ > 2) { } |
|
225
|
0 |
0 |
if (scalar @_ > 2) { } |
|
247
|
0 |
0 |
if (scalar @_ > 2) { } |
|
267
|
0 |
0 |
if (defined $self) { } |
|
274
|
0 |
0 |
if (scalar @_ > 2) { } |
|
282
|
0 |
0 |
if ('Class::LOP'->init($pkg)->create_method($name, $sub)) |
|
294
|
0 |
0 |
unless ($sub eq uc $sub) |
|
296
|
0 |
0 |
unless grep {$_ eq $sub;} @{$Imports;} |
|
307
|
0 |
0 |
if $opt eq 'from' |
|
309
|
0 |
0 |
if $opt eq 'to' |
|
313
|
0 |
0 |
unless ($from and $to) |
|
318
|
0 |
0 |
unless ($from->can($name)) |
|
333
|
0 |
0 |
if ($opt eq 'into') |
|
334
|
0 |
0 |
if (ref $args{'into'} eq 'ARRAY') { } |
|
344
|
0 |
0 |
if (scalar @$into > 0) |
|
346
|
0 |
0 |
unless (_class_exists($c)) |
|
359
|
0 |
0 |
$class->can($method) ? : |
|
362
|
0 |
0 |
if ($opt eq 'then') |
|
363
|
0 |
0 |
if ($can) |
|
365
|
0 |
0 |
if ($opt eq 'or') |
|
366
|
0 |
0 |
unless ($can) |
|
367
|
0 |
0 |
if (ref $args{$opt} eq 'CODE') { } |
|
383
|
0 |
0 |
if ($val) { } |
|
391
|
0 |
0 |
if (scalar @_ > 2) { } |
|
399
|
0 |
0 |
if (ref $name eq 'ARRAY') { } |
|
402
|
0 |
0 |
if (not $pkg->can($sub)) { } |
|
414
|
0 |
0 |
if (not $pkg->can($name)) { } |
|
430
|
0 |
0 |
unless ($pkg->can($method)) |
|
436
|
0 |
0 |
if ($var eq 'class') |
|
439
|
0 |
0 |
if ($var eq 'bless') |
|
446
|
0 |
0 |
if (not $bless) { } |
|
468
|
3 |
0 |
if $Debug == 1 |