Branch Coverage

blib/lib/T2.pm
Criterion Covered Total %
branch 13 212 6.1


line true false branch
17 0 1 if $INIT
20 1 0 unless ($handle)
21 0 1 unless $caller->can("T2")
24 0 1 unless $handle = $caller->T2
27 0 1 unless $handle->isa("Test2::Handle")
34 0 93 if $sym eq "import"
35 0 93 if $sym eq "handle"
40 64 29 defined $proto ? :
43 0 93 unless my $sub = eval qq[#line $line ${\"/root/.cpan/build/T2-0.002-0/blib/lib/T2.pm";}\n$header\n my (\$f) = \@_;\n shift if \$f && "\$f" eq "$class";\n goto &\$code;\n};\n\n\\&$sym;\n]
47 0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
1 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 1 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
2 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
0 0 if $f and "$f" eq "T2"
62 0 0 if ($this)
63 0 0 if "$this" eq "T2"
64 0 0 if ref $this eq "T2"
70 0 0 unless my $sub = $HANDLE->HANDLE_NAMESPACE->can($name)