Branch Coverage

blib/lib/Whatever.pm
Criterion Covered Total %
branch 11 16 68.7


line true false branch
20 0 6 unless my $code = eval "sub {$_ \$_[0]}"
21 2 56 /atan2/ ? :
0 58 unless my $code = /atan2/ ? sub { atan2 $_[0], $_[1]; } : eval "sub {\$_[0] $_ \$_[1]}"
26 145 916 $flip ? :
35 0 12 unless my $code = eval "sub {$_(\$_[0])}"
40 2 4 $_ eq '-' ? :
52 2 0 $^V >= 5.01 ? :
75 0 28 if ($av_push) { }