Branch Coverage

blib/lib/WebService/Geograph/Request.pm
Criterion Covered Total %
branch 3 70 4.2


line true false branch
78 1 0 unless (defined $uri)
110 0 0 unless defined $$rh_args{$_}
115 0 0 if ($mode eq 'csv') { }
0 0 elsif ($mode eq 'search') { }
116 0 0 if &_validate_csv_args($rh_args)
118 0 0 if &_validate_search_args($rh_args)
126 0 0 unless (exists $$rh_args{'q'})
136 0 0 if (exists $$rh_args{'i'})
137 0 0 unless $$rh_args{'i'} =~ /\d/ and not $$rh_args{'i'} =~ /[a-zA-z]/
139 0 0 if exists $$rh_args{'since'} or exists $$rh_args{'limit'} or exists $$rh_args{'ri'} or exists $$rh_args{'last'}
144 0 0 if (exists $$rh_args{'count'})
145 0 0 unless exists $$rh_args{'i'}
147 0 0 unless $$rh_args{'count'} =~ /\d/ and not $$rh_args{'count'} =~ /[a-zA-z]/
151 0 0 if (exists $$rh_args{'page'})
152 0 0 unless exists $$rh_args{'i'}
154 0 0 unless $$rh_args{'page'} =~ /\d/ and not $$rh_args{'page'} =~ /[a-zA-z]/
159 0 0 if (exists $$rh_args{'since'})
161 0 0 unless defined 'Date::Simple'->new($date)
165 0 0 if (exists $$rh_args{'limit'})
166 0 0 unless $$rh_args{'limit'} =~ /\d/ and not $$rh_args{'limit'} =~ /[a-zA-z]/
170 0 0 if (exists $$rh_args{'ri'})
171 0 0 unless $$rh_args{'ri'} == 1 or $$rh_args{'ri'} == 2
175 0 0 if (exists $$rh_args{'last'})
188 0 0 unless $number and $interval and ($number =~ /\d/ and not $number =~ /[a-zA-Z]/) and exists $$rh_valid_intervals{$interval}
195 0 0 if (exists $$rh_args{'thumb'})
196 0 0 unless $$rh_args{'thumb'} == 1 or $$rh_args{'thumb'} == 1
200 0 0 if (exists $$rh_args{'en'})
201 0 0 unless $$rh_args{'en'} == 1 or $$rh_args{'en'} == 1
203 0 0 if exists $$rh_args{'ll'}
207 0 0 if (exists $$rh_args{'ll'})
208 0 0 unless $$rh_args{'ll'} == 1 or $$rh_args{'ll'} == 0
210 0 0 if exists $$rh_args{'en'}
225 0 1 unless defined $mode
232 1 0 unless exists $$rh_valid_modes{$mode}
239 0 0 unless exists $$rh_mode_uri_map{$mode} and defined $$rh_mode_uri_map{$mode}