line |
true |
false |
branch |
283
|
6 |
17952 |
unless $line =~ /\w/ |
305
|
0 |
18546 |
unless my($area, $district) = $outcode =~ /$REGEXES{'strict_partial_anchored_captures'}/ |
307
|
6168 |
12378 |
if length $district < 2 |
326
|
741 |
2893 |
$b eq ' ' ? : |
|
596 |
3634 |
$a eq ' ' ? : |
377
|
0 |
61 |
@_ > 1 ? : |
378
|
33 |
28 |
$pc =~ /$REGEXES{'valid_anchored'}/ ? : |
381
|
0 |
61 |
@_ > 1 ? : |
382
|
51 |
10 |
$pc =~ /$REGEXES{'strict_anchored'}/ ? : |
385
|
0 |
61 |
@_ > 1 ? : |
386
|
60 |
1 |
$pc =~ /$REGEXES{'lax_anchored'}/ ? : |
431
|
1 |
3605 |
unless %OUTCODES |
435
|
1202 |
1202 |
$options->{'strict'} ? : |
|
1202 |
2404 |
$options->{'valid'} ? : |
438
|
1803 |
1803 |
if $options->{'case-insensitive'} |
460
|
2203 |
1833 |
if $options->{'case-insensitive'} |
464
|
1878 |
2158 |
$options->{'partial'} ? : |
469
|
2401 |
1635 |
$area ? : |
471
|
1635 |
2401 |
unless ($strict) |
472
|
1070 |
565 |
if $options->{'strict'} |
475
|
407 |
158 |
unless ($area, $district, $sector, $unit) = $string =~ /$REGEXES{"lax_$re"}/ |
479
|
0 |
251 |
unless $unit or $options->{'partial'} |
481
|
0 |
2559 |
unless defined $district |
486
|
223 |
2336 |
if $options->{'valid'} and not $outcode_data |
488
|
522 |
1814 |
$district =~ s/([A-Z])$// ? : |
490
|
129 |
115 |
$sector ? : |
|
2092 |
244 |
$unit ? : |
505
|
2092 |
244 |
$unit ? : |
|
1658 |
678 |
$outcode_data && $strict ? : |
|
794 |
1542 |
$outcode_data->{'non_geographical'} ? : |
|
264 |
2072 |
$outcode eq 'BF1' ? : |
522
|
9 |
9 |
unless $options |
|
4 |
14 |
unless my $parsed = $class->parse($string, {'partial', 1, %{{} unless $options;}}) |
547
|
2 |
0 |
$data ? : |
562
|
0 |
1 |
unless $class->posttowns_lookup->{$posttown or ''} |
586
|
3 |
2558 |
unless %OUTCODES |
594
|
0 |
1 |
unless %POSTTOWNS |