Branch Coverage

lib/ImgurAPI/Client.pm

Criterion	Covered	Total	%
branch	2	284	0.7

line	true	false	branch
53	0	0	$uri =~ m[^/] ? :
	0	0	$self->{'rapidapi_key'} ? :
55	0	0	$endpoint =~ /\?/ ? :
59	0	0	if ($self->{'auth'}) { }
	0	0	elsif ($self->{'client_id'}) { }
66	0	0	if ($http_method =~ /^GET|DELETE$/ and $data and ref $data eq "HASH")
71	0	0	if ($http_method eq 'POST') { }
	0	0	elsif ($http_method eq 'PUT') { }
79	0	0	if $ENV{'DEBUG'} or $debug // 0
86	0	0	$val && $val =~ /^\d+$/ ? :
92	0	0	if $ENV{'DEBUG'}
94	0	0	if ($self->format_type eq 'xml') { }
98	0	0	if (my $err = $@)
109	0	0	unless my $refresh_token = $opts->{'refresh_token'} || $self->{'refresh_token'}
110	0	0	unless my $client_id = $opts->{'client_id'} || $self->{'client_id'}
111	0	0	unless my $client_secret = $opts->{'client_secret'} || $self->{'client_secret'}
173	1	4	unless my $client_id = $self->{'client_id'}
221	0	0	unless my $user = shift()
227	0	0	unless my $user = shift()
228	0	0	unless my $id = shift()
234	0	0	unless my $user = shift()
240	0	0	unless my $user = shift()
241	0	0	unless my $id = shift()
247	0	0	unless my $user = shift()
255	0	0	unless my $user = shift()
263	0	0	unless my $user = shift()
269	0	0	unless my $user = shift()
272	0	0	if (my $err = $@)
278	0	0	if ($self->{'response'}->code != 201 or $self->{'response'}{'_msg'} ne "Created")
295	0	0	unless my $user = shift()
298	0	0	if (my $err = $@)
304	0	0	if ($self->{'response'}->code == 204)
326	0	0	unless my $user = shift()
327	0	0	unless my $id = shift()
333	0	0	unless my $user = shift()
339	0	0	unless my $user = shift()
340	0	0	unless my $id = shift()
346	0	0	unless my $user = shift()
355	0	0	unless my $user = shift()
364	0	0	unless my $client_id = shift()
365	0	0	unless my $body = shift()
371	0	0	unless my $user = shift()
380	0	0	unless my $user = shift()
389	0	0	unless my $user = shift()
390	0	0	unless my $id = shift()
396	0	0	unless my $user = shift()
402	0	0	unless my $user = shift()
403	0	0	unless my $id = shift()
409	0	0	unless my $user = shift()
417	0	0	unless my $user = shift()
425	0	0	unless my $user = shift()
433	0	0	unless my $user = shift()
439	0	0	unless my $user = shift()
446	0	0	if exists $valid_settings_map{$key}
454	0	0	unless my $user = shift()
462	0	0	unless my $tag = shift()
468	0	0	unless my $tag = shift()
474	0	0	unless my $user = shift()
480	0	0	unless my $user = shift()
487	0	0	unless my $id = shift()
499	0	0	if (exists $valid_opts{$opt})
500	0	0	$opt eq 'ids' || $opt eq 'deletehashes' ? :
510	0	0	unless my $id = shift()
516	0	0	unless my $id = shift()
522	0	0	unless my $album_id = shift()
523	0	0	unless my $image_id = shift()
529	0	0	unless my $album_id = shift()
535	0	0	unless my $album_id = shift()
536	0	0	unless my $image_ids = shift()
542	0	0	unless my $album_id = shift()
543	0	0	unless my $image_ids = shift()
549	0	0	unless my $album_id = shift()
550	0	0	unless my $image_ids = shift()
556	0	0	unless my $album_id = shift()
562	0	0	if (exists $valid_opts{$opt})
563	0	0	$opt eq 'ids' || $opt eq 'deletehashes' ? :
579	0	0	unless my $image_id = shift()
580	0	0	unless my $comment = shift()
583	0	0	$parent_id ? :
592	0	0	unless my $comment_id = shift()
598	0	0	unless my $comment_id = shift()
604	0	0	unless my $image_id = shift()
605	0	0	unless my $comment_id = shift()
606	0	0	unless my $comment = shift()
613	0	0	unless my $comment_id = shift()
617	0	0	if $reason
624	0	0	unless my $comment_id = shift()
625	0	0	unless my $vote = shift()
641	0	0	if ref $opts ne "HASH"
650	0	0	$album_prev ? :
655	0	0	unless my $album_id = shift()
661	0	0	unless my $image_id = shift()
667	0	0	unless my $id = shift()
668	0	0	unless my $comment = shift()
674	0	0	unless my $id = shift()
675	0	0	unless my $comment_id = shift()
681	0	0	unless my $id = shift()
689	0	0	unless my $id = shift()
692	0	0	$reason ? :
694	0	0	if $reason
701	0	0	unless my $id = shift()
707	0	0	unless my $id = shift()
708	0	0	unless my $tags = shift()
714	0	0	unless my $id = shift()
715	0	0	unless my $vote = shift()
721	0	0	unless my $id = shift()
727	0	0	unless my $id = shift()
741	0	0	if ($adv) { }
	0	0	elsif (not $query) { }
744	0	0	if exists $adv_keys{$key}
752	0	0	$adv ? :
757	0	0	unless my $image_id = shift()
758	0	0	unless my $title = shift()
762	0	0	if ($opts)
765	0	0	if (&first(sub { $_ eq $key; } , @optional_keys))
766	0	0	if ($key eq "tags")
767	0	0	if (ref $opts->{'tags'} eq "ARRAY")
781	0	0	unless my $album_id = shift()
782	0	0	unless my $title = shift()
786	0	0	if ($opts)
789	0	0	if (&first(sub { $_ eq $key; } , @optional_keys))
790	0	0	if ($key eq "tags")
791	0	0	if (ref $opts->{'tags'} eq "ARRAY")
805	0	0	unless my $subreddit = shift()
808	0	0	if ref $opts ne "HASH"
814	0	0	$sort eq 'top' ? :
819	0	0	unless my $subreddit = shift()
820	0	0	unless my $image_id = shift()
827	0	0	unless my $tag = shift()
833	0	0	$sort eq 'top' ? :
838	0	0	unless my $tag = shift()
850	0	0	unless my $id = shift()
856	0	0	unless my $src = shift()
857	0	0	unless my $type = shift()
862	0	0	if $opts->{'title'}
863	0	0	if $opts->{'description'}
865	0	0	if ($type eq "file")
866	0	0	unless -e $src
867	0	0	unless -f $src
877	0	0	unless my $id = shift()
883	0	0	unless my $id = shift()
889	0	0	unless my $id = shift()