Branch Coverage

blib/lib/Time/Format.pm
Criterion Covered Total %
branch 28 40 70.0


line true false branch
83 12 297 unless (defined &Time::Format::time_format_perlonly)
85 0 12 unless open DATA, '<', '/root/.cpan/build/Time-Format-1.16-0/blib/lib/Time/Format.pm'
97 0 12 if $@
116 19 6 if (@_) { }
118 5 14 if (grep(($_ eq ':all'), @_)) { }
132 0 25 if (@badsym)
134 0 0 @badsym > 1 ? :
135 0 0 @badsym > 1 ? :
146 35 31 if ($pfx eq '%') { }
0 31 elsif ($pfx eq '@') { }
0 31 elsif ($pfx eq '$') { }
206 453 20 if exists $have{$module}
210 14 6 if exists $INC{"$incmod.pm"}
214 0 6 $@ ? :
223 0 15 unless _have('POSIX')
229 1 14 if (@_ > 1) { }
235 12 2 @_ ? :
246 0 14 unless _have('Date::Manip')
249 13 1 @_ ? :
251 2 12 if $time =~ /^\s* (epoch \s+ \d+)/x