Branch Coverage

blib/lib/Mail/Transport/IMAP4.pm
Criterion Covered Total %
branch 18 152 11.8


line true false branch
34 0 0 if (ref $imap) { }
41 0 0 $args->{'ssl'} ? :
46 0 0 unless $self->SUPER::init($args)
51 0 0 unless (ref $imap)
60 0 0 if ref $ssl eq "HASH"
62 0 0 unless $imap = $self->createImapClient($imap, %opts)
66 0 0 unless $self->imapClient($imap)
67 0 0 unless $self->login
75 0 0 $self->usesSSL ? :
89 0 0 exists $self->{'MTI_auth'} ? :
0 0 unless @types
90 0 0 if @types == 1 and $types[0] eq "AUTO"
97 0 0 $auth eq 'NTLM' ? :
0 0 ref $auth eq 'ARRAY' ? :
107 0 0 unless my $imap = $self->imapClient
108 0 0 /^AUTH=(\S+)/ ? :
111 0 0 if (@serverside)
112 0 0 $clientside{$_} ? :
116 0 0 @auth ? :
122 0 0 if @_
123 0 0 unless $self->{'MTI_domain'}
130 0 0 if (@_) { }
139 0 0 unless my $client = $class->new("Server", $host, "Port", $port, "User", undef, "Password", undef, "Uid", 1, "Peek", 1, @args)
155 0 0 if $imap->IsAuthenticated
160 0 0 unless defined $username
161 0 0 unless defined $password
176 0 0 unless $imap->connect
182 0 0 if defined $challenge
184 0 0 if ($imap->login)
190 0 0 unless --$retries != 0
193 0 0 unless $warn_fail++
197 0 0 if $interval
206 0 0 unless @_
210 0 0 if (defined $self->{'MTI_folder'} and $name eq $self->{'MTI_folder'})
219 0 0 unless my $imap = $self->imapClient
221 0 0 if ($name eq "/" or $imap->select($name))
235 0 0 if (&first(sub { $_ eq $name; } , $self->folders))
250 0 0 unless my $imap = $self->imapClient
251 0 0 if defined $top and $top eq "/"
264 0 0 defined $top ? :
277 0 0 unless my $imap = $self->imapClient
308 0 0 unless my $imap = $self->imapClient
314 0 0 unless exists $$labels{$s->[0]}
328 0 0 unless my $imap = $self->imapClient
333 0 0 if (my $r = $labels2flags{$label}) { }
335 0 0 $value ? :
337 0 0 $value ? :
354 2 5 if (@_ == 1) { }
357 6 0 if (my $r = $labels2flags{$label})
358 5 1 $value ? :
5 1 if $value ? $r->[1] : !$r->[1]
365 20 0 if (my $r = $labels2flags{$label})
366 12 8 $value ? :
12 8 if $value ? $r->[1] : !$r->[1]
382 9 0 if (my $lab = $flags2labels{$f}) { }
383 0 9 $clear ? :
391 3 0 if ($what eq "REPLACE")
394 9 12 if $found{$f}
400 0 3 wantarray ? :
406 0 0 unless my $imap = $self->imapClient
407 0 0 unless my $parsed = $imap->parse_headers($id, @_)
419 0 0 unless my $imap = (shift())->imapClient
420 0 0 builtin::blessed($_[0]) ? :
427 0 0 unless @$msgs
428 0 0 unless my $imap = $self->imapClient
436 0 0 unless $line =~ /\(.*?UID\s+(\d+)/i
438 0 0 unless my $info = $msgs{$id}
440 0 0 if ($line =~ s/^[^(]* \( \s* //x)
451 0 0 if ($line =~ /^\s* (\S+) [ ]*$/x)
457 0 0 if $extra eq ")\n"
472 0 0 unless my $imap = $self->imapClient
474 0 0 if $date and not $date =~ /\D/
488 0 0 defined $folder && $imap ? :
494 0 0 $imap ? :
500 0 0 $imap ? :
510 0 0 if defined $imap