line |
true |
false |
branch |
109
|
199 |
4 |
unless $target->can($name) |
121
|
0 |
0 |
if $_ |
131
|
0 |
0 |
unless ($code) |
143
|
0 |
0 |
unless ($code) |
153
|
0 |
0 |
ref $args[0] eq 'ARRAY' ? : |
|
0 |
0 |
@args > 1 ? : |
205
|
0 |
0 |
if ($next and UNIVERSAL::isa($data, "CODE")) |
209
|
0 |
0 |
if ($next and &Scalar::Util::blessed($data)) |
210
|
0 |
0 |
if UNIVERSAL::can($data, $code) or UNIVERSAL::can($data, "AUTOLOAD") |
214
|
0 |
0 |
if ($next and ref $data eq "SCALAR") |
215
|
0 |
0 |
if UNIVERSAL::can(&load($$data)->package, $code) |
218
|
0 |
0 |
if ($next and UNIVERSAL::can(&load($data)->package, $code)) |
221
|
0 |
0 |
*{"${data}::$code";}{'CODE'} ? : |
223
|
0 |
0 |
if ($next and UNIVERSAL::can($data, "AUTOLOAD")) |
231
|
0 |
0 |
@_ ? : |
237
|
0 |
0 |
$into ? : |
249
|
1 |
0 |
$error ? : |
|
1 |
25 |
wantarray ? : |
255
|
0 |
0 |
if ref $type eq "ARRAY" |
266
|
0 |
0 |
if ($is_true) { } |
269
|
0 |
0 |
$code ? : |
279
|
0 |
0 |
unless $data |
281
|
0 |
0 |
ref $_ eq 'ARRAY' ? : |
299
|
0 |
0 |
@args > 1 ? : |
323
|
0 |
0 |
unless ($code) |
335
|
0 |
0 |
unless ($code) |
347
|
0 |
0 |
unless ($code) |
360
|
0 |
0 |
&Scalar::Util::blessed($_) ? : |
|
0 |
0 |
ref $_ eq 'SCALAR' ? : |
371
|
0 |
0 |
unless ($code) |
383
|
0 |
0 |
unless ($code) |
397
|
0 |
0 |
@args > 1 ? : |
431
|
0 |
0 |
unless ($code) |
445
|
0 |
0 |
unless $code |
451
|
0 |
0 |
if ref $returned eq "HASH" |
461
|
0 |
0 |
unless ($code) |
471
|
0 |
0 |
scalar(@args) % 2 ? : |
|
0 |
0 |
scalar(@args) % 2 ? : |
|
0 |
0 |
ref $args[0] eq 'HASH' ? : |
|
0 |
0 |
@args > 1 ? : |
481
|
0 |
0 |
&type($data, 'coded', 'BOOLEAN') ? : |
505
|
0 |
0 |
unless ($code) |
509
|
0 |
0 |
if (lc $code eq "decode") |
513
|
0 |
0 |
if (lc $code eq "encode") |
523
|
0 |
0 |
ref $_ eq 'ARRAY' ? : |
|
0 |
0 |
defined $_ ? : |
544
|
0 |
0 |
if @args and not $$codes{$args[0]} |
550
|
0 |
0 |
unless @args |
559
|
0 |
0 |
unless @_ |
571
|
0 |
0 |
unless $code |
577
|
0 |
0 |
if ref $returned eq "HASH" |
585
|
0 |
78 |
unless ($lvalue) |
591
|
1 |
77 |
if (@rvalues > 1) { } |
600
|
0 |
77 |
unless ($rvalue) |
604
|
70 |
7 |
if (ref $lvalue eq "HASH") |
605
|
70 |
0 |
if (ref $rvalue eq 'HASH') { } |
609
|
35 |
131 |
ref $lprop eq 'HASH' && ref $rprop eq 'HASH' || ref $lprop eq 'ARRAY' && ref $rprop eq 'ARRAY' ? : |
622
|
7 |
70 |
if (ref $lvalue eq "ARRAY") |
623
|
7 |
0 |
if (ref $rvalue eq 'ARRAY') { } |
627
|
15 |
15 |
ref $lprop eq 'HASH' && ref $rprop eq 'HASH' || ref $lprop eq 'ARRAY' && ref $rprop eq 'ARRAY' ? : |
648
|
0 |
0 |
unless ($code) |
660
|
0 |
0 |
unless ($code) |
672
|
0 |
0 |
unless ($code) |
684
|
0 |
0 |
unless ($code) |
698
|
0 |
0 |
ref $args eq 'HASH' ? : |
|
0 |
0 |
ref $args eq 'ARRAY' ? : |
|
0 |
0 |
defined $args ? : |
701
|
0 |
0 |
wantarray ? : |
709
|
0 |
0 |
unless ($code) |
721
|
0 |
0 |
unless ($code) |
725
|
0 |
0 |
if (lc $code eq "decode") |
729
|
0 |
0 |
if (lc $code eq "encode") |
741
|
0 |
0 |
unless ($code) |
753
|
0 |
0 |
unless ($code) |
767
|
0 |
0 |
if ($data->isa('Venus::Hash')) { } |
|
0 |
0 |
elsif ($data->isa('Venus::Array')) { } |
774
|
0 |
0 |
wantarray ? : |
780
|
0 |
6 |
if ref $self eq "ARRAY" |
785
|
6 |
0 |
unless $parent |
799
|
0 |
0 |
unless ($code) |
817
|
0 |
0 |
unless ($code) |
839
|
0 |
0 |
ref $data eq 'ARRAY' ? : |
843
|
0 |
0 |
unless ($code) |
866
|
0 |
0 |
unless ($code) |
881
|
0 |
0 |
ref $data eq 'ARRAY' ? : |
885
|
0 |
0 |
unless ($code) |
897
|
0 |
0 |
unless ($code) |
909
|
0 |
0 |
unless ($code) |
922
|
0 |
0 |
if ($args[$i] =~ /^\|+$/u) |
925
|
0 |
0 |
if ($args[$i] =~ /^\&+$/u) |
928
|
0 |
0 |
if ($args[$i] =~ /^\w+$/u) |
931
|
0 |
0 |
if ($args[$i] =~ /^[<>]+$/u) |
934
|
0 |
0 |
if ($args[$i] =~ /^\d[<>&]+\d?$/u) |
937
|
0 |
0 |
if ($args[$i] =~ /\$[A-Z]\w+/u) |
940
|
0 |
0 |
if ($args[$i] =~ /^\$\((.*)\)$/u) |
948
|
0 |
0 |
$exit == 0 ? : |
|
0 |
0 |
wantarray ? : |
956
|
0 |
0 |
unless ($code) |
968
|
0 |
0 |
unless ($code) |
982
|
0 |
0 |
@args > 1 ? : |
999
|
0 |
0 |
if (ref $data ne 'HASH') { } |
1000
|
0 |
0 |
if $data |
1003
|
0 |
0 |
if (exists $data->{'as'}) |
1006
|
0 |
0 |
if (exists $data->{'capture'}) |
1009
|
0 |
0 |
if (exists $data->{'context'}) |
1012
|
0 |
0 |
if (exists $data->{'error'}) |
1015
|
0 |
0 |
if (exists $data->{'frame'}) |
1018
|
0 |
0 |
if (exists $data->{'message'}) |
1021
|
0 |
0 |
if (exists $data->{'name'}) |
1024
|
0 |
0 |
if (exists $data->{'package'}) |
1027
|
0 |
0 |
if (exists $data->{'parent'}) |
1030
|
0 |
0 |
if (exists $data->{'stash'}) |
1033
|
0 |
0 |
if (exists $data->{'on'}) |
1038
|
0 |
0 |
unless $code |
1055
|
0 |
0 |
unless ($code) |
1067
|
0 |
0 |
unless ($code) |
1087
|
0 |
0 |
unless ($code) |
1097
|
0 |
0 |
unless @args |
1113
|
0 |
0 |
unless @_ |
1121
|
0 |
0 |
@_ ? : |
1129
|
0 |
0 |
unless ($code) |
1133
|
0 |
0 |
if (lc $code eq "decode") |
1137
|
0 |
0 |
if (lc $code eq "encode") |