Branch Coverage

blib/lib/CPAN/Access/AdHoc/Archive.pm
Criterion Covered Total %
branch 24 34 70.5


line true false branch
25 26 137 if (@value) { }
26 0 26 unless caller eq ref $self
63 26 19 if defined($archive = $archiver->__handle_http_response($resp))
87 0 5 unless $self->item_present($file)
93 0 5 unless (eval { do { $meta = 'CPAN::Meta'->$method($self->get_item_content($file)) } })
111 26 1 if (@value) { }
112 0 26 unless caller eq ref $self
127 26 9 if (@value) { }
128 0 26 unless caller eq ref $self
139 6 5 'HASH' eq ref $args[0] ? :
141 0 11 unless -f $fn
146 0 11 unless open my $fh, '<', $fn
152 2 9 if (defined $$opt{'directory'}) { }
4 5 elsif (defined $$opt{'author'}) { }
153 1 1 if defined $$opt{'author'}
168 0 5 unless ($path =~ s[ \A .* / (?= authors/ | modules/ ) ][]msx)
171 0 0 if $dir[-1] eq ''