blib/lib/Geo/Google.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 2 | 34 | 5.8 |
line | l | !l | condition |
---|---|---|---|
237 | 0 | 0 | $self->error('must provide an address to location()') and return undef |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
203 | 0 | 0 | 0 | defined $msg && $self->isa('Geo::Google') |
427 | 0 | 0 | 0 | $subpath =~ /ddwpt_table/s and not $segment =~ /ddptlnk/s |
521 | 0 | 0 | 0 | $lat == $locations[$j]->latitude and $lon == $locations[$j]->longitude |
535 | 0 | 0 | 0 | $m == $html_segs[1]{'pointIndex'} and $#html_segs > 1 |
685 | 0 | 1 | 2 | length $word >= 1 and ord $quintets[$i] <= 95 |
line | l | !l | condition |
---|---|---|---|
454 | 0 | 0 | $distance ||= '' |
455 | 0 | 0 | $time ||= '' |
833 | 0 | 0 | $arg{'icon'} || 'http://maps.google.com/mapfiles/marker.png' |
0 | 0 | 'http://maps.google.com' . $$marker{'image'} || $arg{'infoStyle'} || 'http://maps.google.com/mapfiles/arrow.png' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
448 | 0 | 0 | 0 | $distance ||= $d2 |
535 | 0 | 0 | 0 | $m == $html_segs[1]{'pointIndex'} and $#html_segs > 1 or not @pointset |
833 | 0 | 0 | 0 | $$marker{'id'} || $arg{'id'} || md5_hex(localtime()) |