Branch Coverage

blib/lib/Mail/Addressbook/Convert/Pegasus.pm
Criterion Covered Total %
branch 41 60 68.3


line true false branch
296 0 1 unless (ref($raMainAddressbookArray) =~ /ARRAY/ and @$raMainAddressbookArray > 0)
326 6 66 unless $field
327 6 66 if ($field =~ /--/) { }
6 60 elsif ($field =~ /Name/) { }
6 54 elsif ($field =~ /Key/) { }
6 48 elsif ($field =~ /E-mail/) { }
6 42 elsif ($field =~ /Notes/) { }
330 6 0 if ($key) { }
337 0 6 if ($debug)
341 0 6 if ($comment)
374 1 0 if (ref($raDistributionLists) =~ /ARRAY/)
387 2 0 if (ref($distFile1) =~ /SCALAR/) { }
0 0 elsif (ref($raDistributionListNames) =~ /ARRAY/) { }
398 0 2 unless ($listFileName)
408 2 8 if ($line =~ /TITLE/)
421 1 9 if ($line =~ /^@/)
427 6 4 unless ($line =~ /^\\/)
446 0 10 if ($member =~ /([\w\-\+\.\_]+)@([\w\-\+\.]+)/)
452 1 9 if ($member =~ /^@/)
456 1 0 if ($listAliasByListFileName{$member})
464 5 5 if ($aliasOfName{$member})
506 8 0 if ($line[0] eq 'alias') { }
511 2 6 if ($commas_outside_quotes1) { }
527 6 0 if ($rest =~ /
0 0 elsif ($rest =~ /\(/) { }
606 6 0 if (not /\@/) { }
615 6 0 if ($aliasid{$localalias})
618 1 5 if ($isGroup{$localalias}) { }
621 0 1 if ($isLongAlias{$localalias})
630 5 0 if ($indivnameForLists{$localalias}) { }