Branch Coverage

blib/lib/TOML/Tiny/Writer.pm
Criterion Covered Total %
branch 51 70 72.8


line true false branch
17 0 765 ref $_[1] eq 'HASH' ? :
20 277 488 if ($ref eq "HASH")
24 65 423 if ($ref eq "ARRAY")
28 0 423 if ($ref eq "SCALAR")
29 0 0 if ($$data eq '1') { }
0 0 elsif ($$data eq '0') { }
38 15 408 if ($ref eq "JSON::PP::Boolean")
39 8 7 $$data ? :
42 0 408 if ($ref eq "Types::Serializer::Boolean")
43 0 0 $data ? :
46 0 408 if ($ref eq "DateTime")
50 1 407 if ($ref eq "Math::BigInt")
54 6 401 if ($ref eq "Math::BigFloat")
55 0 6 if ($data->is_inf or $data->is_nan) { }
62 401 0 if ($ref eq "")
66 179 222 if (svref_2object(\$data)->FLAGS & 768)
67 0 179 if "Math::BigFloat"->new($data)->is_inf
68 0 179 if "Math::BigFloat"->new($data)->is_inf("-")
69 0 179 if "Math::BigFloat"->new($data)->is_nan
73 24 198 if $data =~ /$TOML::Tiny::Writer::DateTime/u
74 9 189 if $data =~ /^$TOML::Tiny::Writer::SpecialFloat$/u
89 0 6 if (ref $value eq 'HASH') { }
115 0 57 unless (@{$data->{$k};})
122 37 20 if (grep {ref $_ ne 'HASH';} @{$$data{$k};}) { }
142 24 136 if (not keys %{$$data{$k};}) { }
161 1 64 if (@$data and $param->{'strict'})
163 0 1 unless $ok
169 5 122 if (ref $item eq 'HASH') { }
182 672 27 if ($str =~ /^$TOML::Tiny::Writer::BareKey$/u)
192 4 23 if ($str =~ /^"/u) { }
237 1 5 if ($dt->time_zone_short_name eq 'floating') { }
1 4 elsif ($dt->time_zone->is_utc) { }
242 2 2 $dt->offset < 0 ? :
251 1 3 if ($secs) { }
260 0 6 $dt->nanosecond ? :