| line |
true |
false |
branch |
|
57
|
0 |
13 |
if (my $ft = $args->{'folder_types'}) |
|
58
|
0 |
0 |
ref $ft->[0] eq 'ARRAY' ? : |
|
62
|
0 |
13 |
if (my $basic = $args->{'autodetect'}) |
|
63
|
0 |
0 |
ref $basic ? : |
|
74
|
1 |
12 |
if (exists $args->{'folderdir'}) |
|
76
|
0 |
1 |
if ref $dirs[0] eq "ARRAY" |
|
80
|
0 |
13 |
if (exists $args->{'folderdirs'}) |
|
82
|
0 |
0 |
if ref $dirs[0] |
|
106
|
0 |
2 |
unless my $dirs = +(shift())->{'MBM_folderdirs'} |
|
107
|
0 |
2 |
if (wantarray) { } |
|
122
|
0 |
3 |
if $name =~ /\:\:/ |
|
125
|
3 |
2 |
if $def->[0] eq $name or $def->[1] eq $name |
|
132
|
3 |
614 |
@_ ? : |
|
141
|
8 |
32 |
@_ % 2 ? : |
|
145
|
32 |
0 |
defined $args{'folder'} ? : |
|
147
|
0 |
40 |
if ($name =~ /^(\w+)\:/ and grep(($_ eq $1), $self->folderTypes)) { } |
|
150
|
0 |
0 |
unless keys %decoded |
|
163
|
14 |
26 |
if (not defined $type) { } |
|
|
0 |
26 |
elsif ($type eq 'pop3' or $type eq 'pop') { } |
|
|
0 |
26 |
elsif ($type eq 'pop3s' or $type eq 'pops') { } |
|
|
0 |
26 |
elsif ($type eq 'imap4' or $type eq 'imap') { } |
|
|
0 |
26 |
elsif ($type eq 'imap4s' or $type eq 'imaps') { } |
|
189
|
0 |
40 |
unless defined $name and length $name |
|
193
|
40 |
0 |
if $self->{'MBM_folderdirs'} |
|
197
|
0 |
40 |
if ($args{'create'} and not $args{'access'} =~ /w|a/) |
|
203
|
1 |
39 |
if my $folder = $self->isOpenFolder($name) |
|
212
|
26 |
13 |
if ($type) |
|
217
|
26 |
13 |
if ($type eq $abbrev or $type eq $class) |
|
224
|
0 |
26 |
unless $folder_type |
|
227
|
13 |
26 |
unless ($folder_type) |
|
231
|
0 |
29 |
if $require_failed{$class} |
|
234
|
0 |
29 |
if ($@) |
|
239
|
12 |
17 |
if ($class->foundIn($name, @defaults, %args)) |
|
246
|
1 |
38 |
unless ($folder_type) |
|
248
|
1 |
0 |
if (my $type = $self->{'MBM_default_type'}) |
|
251
|
1 |
0 |
if ($type eq $abbrev or $type eq $class) |
|
259
|
0 |
39 |
unless ($folder_type) |
|
268
|
0 |
39 |
if $require_failed{$class} |
|
270
|
0 |
39 |
if ($@) |
|
278
|
0 |
38 |
unless (defined $folder) |
|
279
|
0 |
0 |
unless $args{'access'} eq "d" |
|
301
|
0 |
37 |
unless $folder |
|
308
|
1 |
36 |
if @folders == @remaining |
|
314
|
3 |
33 |
unless $options{'close_by_self'} |
|
334
|
0 |
0 |
unless my $folder = $self->open("folder", $name, "access", "d", %args) |
|
345
|
2 |
4 |
if (wantarray) { } |
|
351
|
6 |
0 |
if not builtin::blessed($_[0]) or $_[0]->isa("Mail::Box") |
|
360
|
6 |
0 |
unless builtin::blessed($folder) |
|
363
|
3 |
3 |
if (builtin::blessed($folder)) |
|
365
|
0 |
3 |
unless $folder->isa("Mail::Box") |
|
369
|
3 |
0 |
unless $msg->isa("Mail::Box::Message") and $msg->folder |
|
384
|
0 |
6 |
if $require_failed{$class} |
|
386
|
0 |
6 |
if ($@) |
|
391
|
3 |
3 |
if ($class->foundIn($folder, @gen_options, "access", "a")) |
|
399
|
0 |
3 |
if (not $found and $type) |
|
402
|
0 |
0 |
if ($type eq $name or $type eq $class) |
|
410
|
0 |
3 |
unless $found |
|
427
|
42 |
0 |
if not builtin::blessed($_[0]) or $_[0]->isa("Mail::Box") |
|
432
|
0 |
42 |
unless $message->isa("Mail::Box::Message") |
|
440
|
0 |
42 |
exists $args{'share'} ? : |
|
443
|
0 |
42 |
unless builtin::blessed($folder) |
|
446
|
0 |
42 |
unless (builtin::blessed($folder)) |
|
448
|
0 |
0 |
if ($args{'_delete'}) |
|
456
|
0 |
42 |
if ($msg->folder eq $folder) |
|
461
|
1 |
41 |
if $args{'_delete'} |
|
485
|
0 |
2 |
ref $folders eq 'ARRAY' ? : |
|
|
1 |
2 |
!$folders ? : |
|
488
|
0 |
3 |
if (builtin::blessed($type)) { } |
|
489
|
0 |
0 |
unless $type->isa($base) |
|
497
|
0 |
3 |
if $@ |
|
499
|
0 |
3 |
unless $type->isa($base) |
|
528
|
1 |
15 |
unless my($type, $username, $password, $hostname, $port, $path) = $name =~ m[^
(\w+) \: # protocol
(?: \/\/
(?: ([^:\@/]* ) # username
(?: \: ([^\@/]*) )? # password
\@
)?
([\w.-]+)? # hostname
(?: \: (\d+) )? # port number
)?
(.*) # foldername
]x |