| blib/lib/Geo/Parse/OSM.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 19 | 52 | 36.5 |
| line | true | false | branch |
|---|---|---|---|
| 69 | 0 | 1 | unless $$self{'stream'} = 'IO::Uncompress::AnyUncompress'->new($$self{'file'}, 'MultiStream', 1) |
| 104 | 0 | 1 | if exists $prop{'only'} and ref $prop{'only'} |
| 105 | 0 | 1 | if exists $prop{'only'} and not ref $prop{'only'} |
| 109 | 0 | 1 | if (exists $$self{'saved'}) |
| 112 | 0 | 0 | unless defined $res and $res eq 'stop' and $prop{'save'} |
| 113 | 0 | 0 | if defined $res and $res eq 'stop' |
| 122 | 5 | 12 | if (my($obj) = $line =~ / ^\s* <($obj_types) /ox) { } |
| 3 | 9 | elsif (%object and $line =~ / ^\s* .*? \bv = \k(? |
|
| 5 | 4 | elsif (%object and $line =~ / ^\s* /x) { } |
|
| 0 | 7 | elsif (%object and $line =~ / ^\s* .*? \bref = \k(?.*?) \k.*? \brole = \k(? |
|
| 124 | 2 | 3 | unless defined $$self{$obj} |
| 126 | 0 | 5 | if %filter and not exists $filter{$obj} |
| 152 | 5 | 12 | if (%object and $line =~ m[ ^\s* <(?: / $object{'type'} | $object{'type'} .* / > ) ]x) |
| 154 | 0 | 5 | if (defined $res and $res eq 'stop') |
| 155 | 0 | 0 | if $prop{'save'} |
| 164 | 1 | 2 | unless defined $$self{$type} |
| 184 | 0 | 0 | if (not exists $$self{$obj} or defined $$self{$obj}) { } |
| 186 | 0 | 0 | exists $$self{$obj} ? : |
| 187 | 0 | 0 | if tell $$self{'stream'} > $pos |
| 277 | 0 | 0 | exists $attrorder{$a} ? : |
| 0 | 0 | exists $attrorder{$b} ? : | |
| 0 | 0 | unless (exists $attrorder{$a} ? $attrorder{$a} : 999) <=> (exists $attrorder{$b} ? $attrorder{$b} : 999) | |
| 280 | 0 | 0 | if (grep {ref $_;} values %obj) { } |
| 282 | 0 | 0 | if (exists $obj{'chain'}) |
| 287 | 0 | 0 | if (exists $obj{'members'}) |
| 292 | 0 | 0 | if (exists $obj{'tag'}) |