Branch Coverage

blib/lib/Devel/MAT/Tool.pm
Criterion Covered Total %
branch 3 66 4.5


line true false branch
28 2 2 if $self->can("init_tool")
48 0 18 if $self->{'progress'}
58 0 0 if (defined(my $addr = $inv->pull_token))
60 0 0 if (&any(sub { $addr eq $_; } , 'Devel::MAT::Dumpfile'->ROOTS)) { }
0 0 elsif ($addr =~ /^[\$\@\%\&]/u) { }
68 0 0 if $addr =~ /^0x/u
73 0 0 unless do { BEGIN {${^WARNING_BITS} = "\x54\x55\x55\x51\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x05"} $addr eq $addr + 0 }
76 0 0 unless $sv = $self->df->sv_at($addr)
81 0 0 unless $sv
110 0 0 if (my(%optspec) = $self->CMD_OPTS)
114 0 0 if ($self->CMD_ARGS_SV)
118 0 0 if (my(@argspec) = $self->CMD_ARGS)
148 0 0 if defined $spec->{'alias'}
154 0 0 if $opt eq "--"
156 0 0 if ($opt =~ /^--(.*)$/u) { }
0 0 elsif ($opt =~ /^-(.)$/u) { }
160 0 0 unless $opt = $aliases{$1}
165 0 0 unless $permute
169 0 0 unless my $spec = $optspec->{$opt}
177 0 0 unless defined($val = $inv->pull_token)
181 0 0 unless defined($val = $inv->pull_token)
183 0 0 unless $val =~ /^-?\d+$/u
187 0 0 unless defined($val = $inv->pull_token)
189 0 0 unless $val =~ /^-?\d+$/u or $val =~ /^0x[0-9a-f]+$/iu
192 0 0 if $val =~ /^0x/u
194 0 0 if ($(Syntax::Keyword::Match/topic) eq '') { }
0 0 elsif ($(Syntax::Keyword::Match/topic) eq 's') { }
0 0 elsif ($(Syntax::Keyword::Match/topic) eq 'i') { }
0 0 elsif ($(Syntax::Keyword::Match/topic) eq 'x') { }
217 0 0 unless defined $val or not $argspec->{'required'}
218 0 0 unless defined $val
220 0 0 if ($argspec->{'slurpy'})
223 0 0 if $argspec->{'repeated'}