Branch Coverage

/root/.cpan/build/Imager-1.018-0/blib/lib/Imager/Color/Float.pm
Criterion Covered Total %
branch 39 42 92.8


line true false branch
13 3 16 if ($alpha =~ /^(.*)%\z/) { }
33 4 165 if (@_ == 1 and &Scalar::Util::blessed($_[0]))
34 0 4 if ($_[0]->isa('Imager::Color::Float')) { }
4 0 elsif ($_[0]->isa('Imager::Color')) { }
40 56 109 if @_ == 3
41 63 46 if @_ == 4
42 1 45 if ($_[0] =~ /^\#?([\da-f][\da-f])([\da-f][\da-f])([\da-f][\da-f])([\da-f][\da-f])/i)
46 3 42 if ($_[0] =~ /^\#?([\da-f][\da-f])([\da-f][\da-f])([\da-f][\da-f])/i)
49 42 0 if (@_ == 1)
51 9 33 if ($_[0] =~ /\A$rgb_key\( *$rgb_rgb *\)\z/) { }
12 21 elsif ($_[0] =~ /\A$rgb_key\( *$rgb_rgb_pc *\)\z/) { }
9 12 elsif ($_[0] =~ /\A$rgb_key\( *$rgb_rgb$rgb_alpha_sep$rgb_alpha *\)\z/) { }
10 2 elsif ($_[0] =~ /\A$rgb_key\( *$rgb_rgb_pc$rgb_alpha_sep$rgb_alpha *\)\z/) { }
71 166 1 @arg ? :
77 1 1 @arg ? :
88 2 12 $result > 255 ? :
2 14 $result < 0 ? :
105 16 30 if (abs sprintf("%.0f", $s * 255) - $s * 255 > "0.0001")
111 13 11 if ($alpha == 1) { }
112 4 9 if ($can_byte) { }
123 4 7 if ($can_byte) { }