Branch Coverage

blib/lib/Catmandu/SFX.pm
Criterion Covered Total %
branch 33 44 75.0


line true false branch
17 4 2 if ($str =~ /^Available\s+(.*)\./)
20 4 0 if (defined $from and $from =~ / (in|from) \s+ (\d+) (\s+volume:\s+(\S+))? (\s+issue:\s+(\S+))? (.*) /x)
29 2 2 if $3
30 1 3 if $5
35 0 4 if (defined $until and $until =~ / until \s+ (\d+) (\s+volume:\s+(\S+))? (\s+issue:\s+(\S+))? /x)
42 0 0 if $1
43 0 0 if $3
44 0 0 if $5
49 4 2 if ($str =~ / Most \s+ recent \s+ (\d+) \s+ (year|month) \(s\) \s+ (not\s+)? available \. /x)
66 3 1 $3 ? :
69 4 2 if (exists $res->{'end'}{'year'} or exists $res->{'limit'}{'num'}) { }
89 6 0 if (is_array_ref($years) and @$years > 0)
91 4 2 if @$years > 1
94 4 2 if ($parsed->{'is_running'} == 0) { }
110 4 2 if exists $parsed->{'start'}{'year'}
113 0 6 if exists $parsed->{'end'}{'year'}
117 2 2 if (exists $parsed->{'limit'} and $parsed->{'limit'}{'num'} and $parsed->{'limit'}{'type'} eq 'year' and $parsed->{'limit'}{'available'} == 0)
124 4 2 if ($start_year < $end_year) { }
135 0 1 unless is_array_ref($years) and @$years > 0
149 1 5 if (not defined $start) { }
3 2 elsif ($_ == $prev + 1) { }
1 1 elsif ($start == $prev) { }