| line |
true |
false |
branch |
|
66
|
2 |
1 |
if defined $self->{'UIL_country'} |
|
68
|
0 |
1 |
unless my $cc = $self->countryCode |
|
71
|
1 |
0 |
if $@ |
|
85
|
0 |
3 |
unless my $phone = $self->{'UIL_phone'} |
|
87
|
2 |
1 |
ref $phone ? : |
|
88
|
1 |
2 |
if (wantarray) { } |
|
95
|
0 |
3 |
unless my $fax = $self->{'UIL_fax'} |
|
96
|
2 |
1 |
ref $fax ? : |
|
97
|
1 |
2 |
if (wantarray) { } |
|
106
|
1 |
1 |
if ($address = $self->pobox) { } |
|
110
|
0 |
2 |
unless defined $city and defined $address |
|
113
|
1 |
0 |
defined $cc ? : |
|
|
1 |
1 |
defined $country ? : |
|
115
|
1 |
1 |
defined $org && length $org ? : |
|
117
|
2 |
0 |
if ($cc eq 'nl') { } |
|
118
|
2 |
0 |
if defined $pc and $pc =~ /(\d{4})\s*([a-zA-Z]{2})/ |