line |
true |
false |
branch |
1751
|
4 |
0 |
defined $_[0] ? : |
1754
|
0 |
4 |
unless ref $opt eq 'HASH' |
1757
|
0 |
4 |
if exists $$opt{'b1'} |
1760
|
0 |
4 |
exists $$opt{'b2'} ? : |
1763
|
1 |
3 |
unless exists $$opt{'b3'} |
1767
|
1 |
2 |
unless exists $$opt{'b4'} |
1771
|
0 |
2 |
if (exists $$opt{'m1'}) { } |
1772
|
0 |
0 |
unless ref $$opt{'m1'} eq 'ARRAY' |
1780
|
0 |
2 |
unless exists $$opt{'m10'} |
1781
|
0 |
2 |
unless ref $$opt{'m10'} eq 'ARRAY' |
1785
|
2 |
0 |
if (exists $$opt{'m2'}) { } |
1786
|
0 |
2 |
unless ref $$opt{'m2'} eq 'ARRAY' |
1794
|
2 |
0 |
if (exists $$opt{'m3'}) { } |
1795
|
0 |
2 |
unless ref $$opt{'m3'} eq 'ARRAY' |
1803
|
2 |
0 |
if (exists $$opt{'m4'}) { } |
1804
|
0 |
2 |
unless ref $$opt{'m4'} eq 'ARRAY' |
1812
|
2 |
0 |
if (exists $$opt{'m5'}) { } |
1813
|
0 |
2 |
unless ref $$opt{'m5'} eq 'ARRAY' |
1821
|
0 |
2 |
unless exists $$opt{'m6'} |
1822
|
0 |
2 |
unless ref $$opt{'m6'} eq 'ARRAY' |
1826
|
0 |
2 |
unless exists $$opt{'m7'} |
1827
|
0 |
2 |
unless ref $$opt{'m7'} eq 'ARRAY' |
1831
|
0 |
2 |
unless exists $$opt{'m8'} |
1832
|
0 |
2 |
unless ref $$opt{'m8'} eq 'ARRAY' |
1836
|
0 |
2 |
unless exists $$opt{'m9'} |
1837
|
0 |
2 |
unless ref $$opt{'m9'} eq 'ARRAY' |
1841
|
0 |
2 |
if exists $$opt{'s1'} |
1844
|
0 |
2 |
if exists $$opt{'s2'} |
1847
|
0 |
2 |
if exists $$opt{'s3'} |
1850
|
0 |
2 |
if exists $$opt{'s4'} |
1853
|
0 |
2 |
if exists $$opt{'s5'} |
1856
|
0 |
2 |
unless exists $$opt{'s6'} |
1867
|
4 |
0 |
unless (exists $ALLOW_ISA{$name} or exists $ALLOW_REF{$name} or exists $ALLOW_RX{$name} or exists $ALLOW_VALUE{$name}) |
1875
|
15 |
3 |
if (ref $val and exists $ALLOW_ISA{$name}) |
1877
|
15 |
0 |
if &UNIVERSAL::isa($val, $class) |
1882
|
0 |
3 |
if (ref $val and exists $ALLOW_REF{$name}) |
1883
|
0 |
0 |
if exists $ALLOW_REF{$name}{ref $val} |
1887
|
2 |
1 |
if (defined $val and not ref $val and exists $ALLOW_RX{$name}) |
1889
|
2 |
0 |
if $val =~ /$rx/u |
1894
|
1 |
0 |
if (not ref $val and exists $ALLOW_VALUE{$name}) |
1895
|
1 |
0 |
if exists $ALLOW_VALUE{$name}{$val} |
1918
|
0 |
0 |
unless &_value_is_allowed('m10', @value) |
1930
|
0 |
0 |
unless &_value_is_allowed('m8', @_) |
1944
|
0 |
0 |
if exists $$self{'tmp_TestPkg'}{'m10'}{$val} |
1946
|
0 |
0 |
if scalar keys %{$$self{'tmp_TestPkg'}{'m10'};} == scalar keys %would_delete |
1951
|
0 |
0 |
unless exists $$self{'tmp_TestPkg'}{'m10'}{$val} |
1964
|
0 |
0 |
if exists $$self{'tmp_TestPkg'}{'m8'}{$val} |
1966
|
0 |
0 |
if scalar keys %{$$self{'tmp_TestPkg'}{'m8'};} == scalar keys %would_delete |
1971
|
0 |
0 |
unless exists $$self{'tmp_TestPkg'}{'m8'}{$val} |
1988
|
0 |
0 |
if $val1 eq $val2 |
2012
|
0 |
0 |
if $val1 eq $val2 |
2025
|
0 |
0 |
if $val1 eq $val2 |
2038
|
0 |
0 |
if $val1 eq $val2 |
2051
|
0 |
0 |
if $val1 eq $val2 |
2064
|
0 |
0 |
if $val1 eq $val2 |
2077
|
0 |
0 |
if $val1 eq $val2 |
2108
|
0 |
0 |
if (scalar @_) { } |
2124
|
0 |
0 |
if (scalar @_) { } |
2140
|
0 |
0 |
if (scalar @_) { } |
2156
|
0 |
0 |
if (scalar @_) { } |
2172
|
0 |
0 |
if (scalar @_) { } |
2188
|
0 |
0 |
if (scalar @_) { } |
2204
|
0 |
0 |
if (scalar @_) { } |
2220
|
0 |
0 |
if (scalar @_) { } |
2272
|
0 |
0 |
if ($$self{'tmp_TestPkg'}{'b1'}) { } |
2283
|
0 |
0 |
if ($$self{'tmp_TestPkg'}{'b2'}) { } |
2294
|
0 |
0 |
if ($$self{'tmp_TestPkg'}{'b3'}) { } |
2305
|
0 |
0 |
if ($$self{'tmp_TestPkg'}{'b4'}) { } |
2331
|
0 |
0 |
unless scalar @_ > 1 |
2341
|
0 |
0 |
unless scalar @_ > 1 |
2351
|
0 |
0 |
unless scalar @_ > 1 |
2361
|
0 |
0 |
unless scalar @_ > 1 |
2371
|
0 |
0 |
unless scalar @_ > 1 |
2381
|
0 |
0 |
unless scalar @_ > 1 |
2391
|
0 |
0 |
unless scalar @_ > 1 |
2403
|
0 |
0 |
unless &_value_is_allowed('m1', @_) |
2413
|
0 |
0 |
unless &_value_is_allowed('m2', @_) |
2423
|
0 |
0 |
unless &_value_is_allowed('m3', @_) |
2433
|
0 |
0 |
unless &_value_is_allowed('m4', @_) |
2443
|
0 |
0 |
unless &_value_is_allowed('m5', @_) |
2453
|
0 |
0 |
unless &_value_is_allowed('m6', @_) |
2463
|
0 |
0 |
unless &_value_is_allowed('m7', @_) |
2473
|
0 |
0 |
unless &_value_is_allowed('m9', @_) |
2477
|
0 |
0 |
if exists $$self{'tmp_TestPkg'}{'m9'}{'HASH'}{$val} |
2486
|
0 |
0 |
if (shift()) { } |
2497
|
4 |
0 |
if (shift()) { } |
2508
|
3 |
0 |
if (shift()) { } |
2519
|
0 |
2 |
if (shift()) { } |
2533
|
0 |
0 |
unless $idx == int $idx |
2534
|
0 |
0 |
unless $idx >= 0 |
2537
|
0 |
0 |
unless &_value_is_allowed('m1', $val) |
2549
|
0 |
0 |
unless $idx == int $idx |
2550
|
0 |
0 |
unless $idx >= 0 |
2553
|
0 |
0 |
unless &_value_is_allowed('m2', $val) |
2565
|
0 |
0 |
unless $idx == int $idx |
2566
|
0 |
0 |
unless $idx >= 0 |
2569
|
0 |
0 |
unless &_value_is_allowed('m3', $val) |
2581
|
0 |
0 |
unless $idx == int $idx |
2582
|
0 |
0 |
unless $idx >= 0 |
2585
|
0 |
0 |
unless &_value_is_allowed('m4', $val) |
2597
|
0 |
0 |
unless $idx == int $idx |
2598
|
0 |
0 |
unless $idx >= 0 |
2601
|
0 |
0 |
unless &_value_is_allowed('m5', $val) |
2613
|
0 |
0 |
unless $idx == int $idx |
2614
|
0 |
0 |
unless $idx >= 0 |
2617
|
0 |
0 |
unless &_value_is_allowed('m6', $val) |
2629
|
0 |
0 |
unless $idx == int $idx |
2630
|
0 |
0 |
unless $idx >= 0 |
2633
|
0 |
0 |
unless &_value_is_allowed('m7', $val) |
2643
|
0 |
2 |
unless &_value_is_allowed('m1', @_) |
2653
|
0 |
2 |
unless scalar @_ |
2664
|
0 |
2 |
unless &_value_is_allowed('m10', @value) |
2679
|
0 |
2 |
unless scalar @_ |
2682
|
0 |
2 |
unless &_value_is_allowed('m2', @_) |
2692
|
0 |
2 |
unless scalar @_ |
2695
|
0 |
2 |
unless &_value_is_allowed('m3', @_) |
2705
|
0 |
2 |
unless scalar @_ |
2708
|
0 |
2 |
unless &_value_is_allowed('m4', @_) |
2718
|
0 |
2 |
unless scalar @_ |
2721
|
0 |
2 |
unless &_value_is_allowed('m5', @_) |
2731
|
0 |
2 |
unless scalar @_ |
2734
|
0 |
2 |
unless &_value_is_allowed('m6', @_) |
2744
|
0 |
2 |
unless scalar @_ |
2747
|
0 |
2 |
unless &_value_is_allowed('m7', @_) |
2757
|
0 |
2 |
unless scalar @_ |
2760
|
0 |
2 |
unless &_value_is_allowed('m8', @_) |
2775
|
0 |
2 |
unless scalar @_ |
2778
|
0 |
2 |
unless &_value_is_allowed('m9', @_) |
2786
|
0 |
2 |
if exists $$self{'tmp_TestPkg'}{'m9'}{'HASH'}{$val} |
2797
|
0 |
0 |
unless $num == int $num |
2808
|
0 |
0 |
unless $num == int $num |
2819
|
0 |
0 |
unless $num == int $num |
2830
|
0 |
0 |
unless $num == int $num |
2841
|
0 |
0 |
unless $num == int $num |
2852
|
0 |
0 |
unless $num == int $num |
2863
|
0 |
0 |
unless $num == int $num |
2874
|
0 |
0 |
unless &_value_is_allowed('s1', $val) |
2885
|
0 |
0 |
unless defined $val |
2888
|
0 |
0 |
unless &_value_is_allowed('s2', $val) |
2899
|
0 |
0 |
unless defined $val |
2902
|
0 |
0 |
unless &_value_is_allowed('s3', $val) |
2913
|
0 |
0 |
unless defined $val |
2916
|
0 |
0 |
unless &_value_is_allowed('s4', $val) |
2927
|
0 |
0 |
unless defined $val |
2930
|
0 |
0 |
unless &_value_is_allowed('s5', $val) |
2941
|
0 |
2 |
unless defined $val |
2944
|
0 |
2 |
unless &_value_is_allowed('s6', $val) |
2961
|
0 |
0 |
unless scalar @_ > 1 |
2971
|
0 |
0 |
unless scalar @_ > 1 |
2981
|
0 |
0 |
unless scalar @_ > 1 |
2991
|
0 |
0 |
unless scalar @_ > 1 |
3001
|
0 |
0 |
unless scalar @_ > 1 |
3011
|
0 |
0 |
unless scalar @_ > 1 |
3021
|
0 |
0 |
unless scalar @_ > 1 |
3033
|
0 |
0 |
unless &_value_is_allowed('m1', @_) |
3043
|
0 |
0 |
unless &_value_is_allowed('m2', @_) |
3053
|
0 |
0 |
unless &_value_is_allowed('m3', @_) |
3063
|
0 |
0 |
unless &_value_is_allowed('m4', @_) |
3073
|
0 |
0 |
unless &_value_is_allowed('m5', @_) |
3083
|
0 |
0 |
unless &_value_is_allowed('m6', @_) |
3093
|
0 |
0 |
unless &_value_is_allowed('m7', @_) |
3103
|
0 |
0 |
unless &_value_is_allowed('m9', @_) |
3107
|
0 |
0 |
if exists $$self{'tmp_TestPkg'}{'m9'}{'HASH'}{$val} |
3116
|
0 |
0 |
if (scalar @_) { } |
3119
|
0 |
0 |
if exists $$self{'tmp_TestPkg'}{'m10'}{$key} |