Branch Coverage

blib/lib/Config/Apple/Profile/Payload/Email.pm
Criterion Covered Total %
branch 21 22 95.4


line true false branch
132 8 132 if ($key eq 'EmailAddress') { }
4 128 elsif ($key eq 'EmailAccountType') { }
106 22 elsif ($key eq 'IncomingMailServerHostName' or $key eq 'OutgoingMailServerHostName') { }
14 8 elsif ($key eq 'IncomingMailServerPortNumber' or $key eq 'OutgoingMailServerPortNumber') { }
8 0 elsif ($key eq 'IncomingMailServerAuthentication' or $key eq 'OutgoingMailServerAuthentication') { }
134 1 7 unless defined $value
143 2 2 if ($value =~ /^(EmailTypePOP|EmailTypeIMAP)$/su)
155 32 74 if ($value =~ /^( $Config::Apple::Profile::Payload::Email::RE{'net'}{'domain'}{-'nospace'} |$Config::Apple::Profile::Payload::Email::RE{'net'}{'IPv4'} |$Config::Apple::Profile::Payload::Email::RE{'net'}{'IPv6'} )$ /isux)
171 8 4 if ($value =~ /^(\d+)$/su)
173 4 4 if $number > 0 and $number < 65535
184 4 4 if ($value =~ /^(EmailAuthPassword|EmailAuthNone)$/su)