| line |
true |
false |
branch |
|
56
|
0 |
0 |
unless valid($postcode) |
|
58
|
0 |
0 |
unless ($self) |
|
89
|
0 |
0 |
unless defined $self |
|
90
|
0 |
0 |
if exists $postcode_of{$self} |
|
97
|
0 |
0 |
unless defined $self |
|
98
|
0 |
0 |
if exists $location_of{$self} |
|
105
|
0 |
0 |
unless defined $self |
|
106
|
0 |
0 |
if exists $borough_of{$self} |
|
113
|
0 |
0 |
unless defined $self |
|
114
|
0 |
0 |
if exists $county_of{$self} |
|
121
|
0 |
0 |
unless defined $self |
|
122
|
0 |
0 |
if exists $type_of{$self} |
|
129
|
0 |
0 |
unless defined $self |
|
130
|
0 |
0 |
unless exists $type_of{$self} |
|
131
|
0 |
0 |
unless exists $typedesc{$type_of{$self}} |
|
138
|
0 |
0 |
unless defined $self |
|
139
|
0 |
0 |
if exists $owner_of{$self} |
|
146
|
0 |
0 |
unless defined $self |
|
147
|
0 |
0 |
if exists $address_of{$self} |
|
166
|
45 |
1 |
if $field =~ /Geo::Postcodes/ |
|
168
|
35 |
11 |
if $valid_fields{$field} |
|
232
|
0 |
0 |
unless $type |
|
233
|
0 |
0 |
unless exists $typedesc{$type} |
|
252
|
6 |
6 |
if $legal_mode{$mode} |
|
259
|
48 |
12 |
if $legal_initial_mode{$mode} or $legal_mode{$mode} |
|
288
|
0 |
53 |
unless @args |
|
290
|
41 |
12 |
if (is_legal_initial_selectionmode($args[0])) |
|
294
|
5 |
20 |
if (@args and $args[0] eq 'not' and is_legal_initial_selectionmode("$mode $args[0]")) |
|
303
|
4 |
37 |
if $mode eq 'all' or $mode eq 'none' |
|
304
|
1 |
36 |
if $mode eq 'one' and @args == 0 |
|
307
|
14 |
22 |
unless @args >= 2 |
|
317
|
34 |
11 |
if ($caller_class->is_field($argument)) { } |
|
|
5 |
6 |
elsif (is_legal_selectionmode($argument)) { } |
|
|
4 |
2 |
elsif ($argument eq 'procedure') { } |
|
322
|
34 |
0 |
if (@args) { } |
|
337
|
1 |
4 |
if (@args and $args[0] eq 'not' and is_legal_selectionmode("$argument $args[0]")) |
|
345
|
0 |
5 |
unless (@args >= 2) |
|
358
|
4 |
0 |
if (ref $procedure eq 'CODE') { } |
|
360
|
2 |
2 |
if (_valid_procedure_pointer($procedure)) { } |
|
387
|
30 |
4 |
if $status |
|
404
|
0 |
0 |
if ($_[0] eq $caller_class) |
|
412
|
0 |
0 |
unless $procedure_pointer |
|
417
|
0 |
0 |
unless @postcodes |
|
421
|
0 |
0 |
$objects_requested ? : |
|
451
|
0 |
1 |
if ($_[0] eq $caller_class) |
|
457
|
0 |
1 |
if ($_[0] eq 'all') { } |
|
|
0 |
1 |
elsif ($_[0] eq 'none') { } |
|
462
|
0 |
0 |
unless $objects_requested |
|
480
|
0 |
1 |
if ($_[0] eq 'one') |
|
498
|
1 |
0 |
if (@_) { } |
|
|
0 |
0 |
elsif ($limit) { } |
|
500
|
1 |
0 |
if (is_legal_initial_selectionmode($_[0])) |
|
502
|
0 |
1 |
if ($_[1] eq 'not' and is_legal_initial_selectionmode("$_[0] $_[1]")) { } |
|
508
|
1 |
0 |
if is_legal_initial_selectionmode($_[0]) |
|
514
|
0 |
1 |
if ($field eq 'procedure') { } |
|
517
|
0 |
0 |
unless _valid_procedure_pointer($procedure) |
|
524
|
0 |
0 |
if $@ |
|
526
|
0 |
0 |
unless $match |
|
|
0 |
0 |
if ($mode =~ /not/) { } |
|
527
|
0 |
0 |
if $match |
|
532
|
0 |
1 |
unless &{&_proc_pointer($caller_class . '::is_field');}($field) |
|
539
|
0 |
1 |
unless $value |
|
547
|
0 |
0 |
unless $current_value |
|
552
|
0 |
0 |
unless $match |
|
|
0 |
0 |
if ($mode =~ /not/) { } |
|
553
|
0 |
0 |
if $match |
|
557
|
0 |
1 |
if $mode eq 'not' |
|
567
|
0 |
0 |
if (is_legal_selectionmode($_[0])) |
|
569
|
0 |
0 |
if ($_[1] eq 'not' and is_legal_selectionmode("$_[0] $_[1]")) { } |
|
575
|
0 |
0 |
if is_legal_selectionmode($_[0]) |
|
586
|
0 |
0 |
if ($field eq 'procedure') { } |
|
590
|
0 |
0 |
unless _valid_procedure_pointer($procedure) |
|
594
|
0 |
0 |
unless &{&_proc_pointer($caller_class . '::is_field');}($field) |
|
602
|
0 |
0 |
unless $value |
|
606
|
0 |
0 |
$mode =~ /and/ ? : |
|
614
|
0 |
0 |
if ($procedure) { } |
|
617
|
0 |
0 |
if $@ |
|
624
|
0 |
0 |
unless $current_value |
|
630
|
0 |
0 |
if ($mode eq 'and') { } |
|
|
0 |
0 |
elsif ($mode eq 'and not') { } |
|
|
0 |
0 |
elsif ($mode eq 'nand') { } |
|
|
0 |
0 |
elsif ($mode eq 'nand not') { } |
|
|
0 |
0 |
elsif ($mode eq 'or') { } |
|
|
0 |
0 |
elsif ($mode eq 'or not') { } |
|
|
0 |
0 |
elsif ($mode eq 'nor') { } |
|
|
0 |
0 |
elsif ($mode eq 'nor not') { } |
|
|
0 |
0 |
elsif ($mode eq 'xor') { } |
|
|
0 |
0 |
elsif ($mode eq 'xor not') { } |
|
|
0 |
0 |
elsif ($mode eq 'xnor') { } |
|
|
0 |
0 |
elsif ($mode eq 'xnor not') { } |
|
632
|
0 |
0 |
unless $match |
|
636
|
0 |
0 |
if $match |
|
641
|
0 |
0 |
if $out{$postcode} |
|
|
0 |
0 |
if ($match and $out{$postcode}) { } |
|
646
|
0 |
0 |
if $out{$postcode} |
|
|
0 |
0 |
if (not $match and $out{$postcode}) { } |
|
652
|
0 |
0 |
if $match |
|
656
|
0 |
0 |
unless $match |
|
660
|
0 |
0 |
if (not $match || $out{$postcode}) { } |
|
661
|
0 |
0 |
if $out{$postcode} |
|
665
|
0 |
0 |
if ($match and not $out{$postcode}) { } |
|
666
|
0 |
0 |
if $out{$postcode} |
|
670
|
0 |
0 |
if ($match) |
|
672
|
0 |
0 |
if ($out{$postcode}) { } |
|
678
|
0 |
0 |
unless ($match) |
|
680
|
0 |
0 |
if ($out{$postcode}) { } |
|
687
|
0 |
0 |
$out{$postcode} ? : |
|
688
|
0 |
0 |
if ($match == $boolean) { } |
|
694
|
0 |
0 |
if $out{$postcode} |
|
699
|
0 |
0 |
$out{$postcode} ? : |
|
700
|
0 |
0 |
if ($match != $boolean) { } |
|
706
|
0 |
0 |
if $out{$postcode} |
|
714
|
1 |
0 |
unless %out |
|
719
|
0 |
0 |
if ($limit) { } |
|
733
|
0 |
0 |
unless $objects_requested |
|
755
|
0 |
4 |
if ref $ptr ne 'CODE' |
|
756
|
2 |
2 |
if defined &$ptr |