Branch Coverage

blib/lib/Test/CPAN/Meta/JSON/Version.pm
Criterion Covered Total %
branch 125 146 85.6


line true false branch
447 28 30 unless ($$self{'spec'})
448 25 3 $$data{'meta-spec'} && $$data{'meta-spec'}{'version'} ? :
452 25 33 defined $$self{'errors'} ? :
457 25 55 unless $$self{'errors'}
486 1 549 if (ref $spec ne 'HASH')
491 8 541 if (ref $data ne 'HASH')
497 1321 571 unless $$spec{$key}{'mandatory'}
498 557 14 if defined $$data{$key}
506 1046 754 if ($$spec{$key}) { }
754 0 elsif ($$spec{':key'}) { }
507 616 430 if ($$spec{$key}{'value'}) { }
296 134 elsif ($$spec{$key}{'map'}) { }
82 52 elsif ($$spec{$key}{'list'}) { }
52 0 elsif ($$spec{$key}{'lazylist'}) { }
521 570 184 if ($$spec{':key'}{'value'}) { }
184 0 elsif ($$spec{':key'}{'map'}) { }
0 0 elsif ($$spec{':key'}{'list'}) { }
0 0 elsif ($$spec{':key'}{'lazylist'}) { }
0 0 elsif (not $$spec{':key'}{'name'}) { }
543 8 44 if (defined $data and not ref $data)
553 8 138 if (ref $data ne 'ARRAY')
558 0 138 if (defined $$spec{'mandatory'})
559 0 0 unless (defined $$data[0])
566 209 0 if (defined $$spec{'value'}) { }
0 0 elsif (defined $$spec{'map'}) { }
0 0 elsif (defined $$spec{'list'}) { }
0 0 elsif (defined $$spec{'lazylist'}) { }
0 0 elsif ($$spec{':key'}) { }
693 82 12 if ($value) { }
696 12 70 unless ($scheme)
700 14 56 unless ($auth)
714 57 5 if (defined $value)
715 37 20 if $value and $known_specs{$$self{'spec'}} eq $value
716 10 10 if ($value and $known_urls{$value})
727 423 6 if (defined $value)
728 417 6 if $value or $value =~ /^0$/
736 6 18 unless defined $value
737 12 6 if $value or $value =~ /^0$/
744 82 6 if defined $value
751 517 6 if (defined $value and $value || $value =~ /0/)
753 6 541 unless $self->version($key, $_)
756 12 6 unless defined $value
763 771 12 if (defined $value) { }
764 6 765 unless $value or $value =~ /0/
765 751 14 if $value =~ /^\s*((<|<=|>=|>|!=|==)\s*)?v?\d+((\.\d+((_|\.)\d+)?)?)/
775 48 12 if (defined $value) { }
776 36 12 if $value =~ /^(0|1|true|false)$/
834 133 45 $$self{'spec'} < 2 ? :
835 172 6 if (defined $value) { }
836 157 15 if $value and exists $$licenses{$value}
840 5 10 if $value and $$self{'spec'} < 2
850 37 6 if (defined $key) { }
853 24 7 if $key and $key =~ /^[a-z]+$/i and $key =~ /[A-Z]/
863 119 6 if (defined $key) { }
864 83 36 if $key and $key =~ /^([a-z][-_a-z]*)$/
865 6 30 if $key and $key =~ /^x_([a-z][-_a-z]*)$/i
875 72 6 if (defined $key) { }
876 48 24 if $key and $key =~ /^([a-z][_a-z]+)$/i
886 597 6 if (defined $key) { }
887 579 18 if $key and $key =~ /^[A-Za-z0-9_]+(::[A-Za-z0-9_]+)*$/
897 25 1 if (defined $value) { }
899 3 22 if ($version =~ /_/) { }
900 2 1 if $value =~ /\A(?:testing|unstable)\z/
903 18 4 if $value =~ /\A(?:stable|testing|unstable)\z/
914 10 1 if (defined $key) { }
917 2 7 if $key and $key =~ /^[a-z]+$/i and $key =~ /[A-Z]/
927 19 1 if (defined $key) { }
930 2 17 if $key and $key =~ /^x_([a-z][-_a-z]*)$/i
941 53 1 if (defined $key) { }
942 47 6 if length $key and grep {$key eq $_;} @valid_phases
953 64 1 if (defined $key) { }
954 58 6 if length $key and grep {$key eq $_;} @valid_relations
968 61 297 if $$self{'stack'}