blib/lib/App/Addex/AddressBook/Abook.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 5 | 6 | 83.3 |
line | true | false | branch |
---|---|---|---|
22 | 6 | 29 | $line =~ /\A\s*(?:[;#]|$)/ ? : |
61 | 0 | 1 | if $@ |
73 | 1 | 2 | unless my(@emails) = map({'App::Addex::Entry::EmailAddress'->new($_);} split(/\s*,\s*/, $person->{'email'} || '', 0)) |