| line |
true |
false |
branch |
|
63
|
0 |
4010 |
if @_
|
|
74
|
0 |
8020 |
unless $1 eq $3
|
|
75
|
0 |
8020 |
unless $Geo::TCX::Trackpoint::possible_attr{$1}
|
|
96
|
0 |
98 |
if $@
|
|
126
|
40 |
66 |
unless $attr =~ /[^A-Z]/
|
|
127
|
0 |
66 |
unless $Geo::TCX::Trackpoint::possible_attr{$attr}
|
|
128
|
6 |
60 |
if @_
|
|
149
|
1 |
0 |
if defined $pt->AltitudeMeters
|
|
150
|
1 |
0 |
if defined $pt->Time
|
|
166
|
0 |
1 |
if @_
|
|
182
|
0 |
3 |
if @_
|
|
202
|
0 |
15 |
if @_ or not $to->isa("Geo::TCX::Trackpoint")
|
|
222
|
0 |
0 |
$opts{'indent'} ? :
|
|
223
|
0 |
0 |
$opts{'indent'} ? :
|
|
224
|
0 |
0 |
$opts{'n_tabs'} ? :
|
|
246
|
0 |
0 |
if @_
|
|
281
|
3887 |
93 |
if (ref $previous_pt)
|
|
282
|
0 |
3887 |
unless $previous_pt->isa("Geo::TCX::Trackpoint")
|
|
284
|
0 |
3980 |
if @_
|
|
291
|
3980 |
0 |
if ($chomped_str =~ m[\s*^\<Trackpoint\>(.*)\</Trackpoint\>\s*$]gs)
|
|
298
|
3979 |
1 |
if ($chomped_str =~ s[(<Position>.*</Position>)][]g) { }
|
|
314
|
0 |
15032 |
unless $1 eq $3
|
|
315
|
0 |
15032 |
unless $Geo::TCX::Trackpoint::Full::possible_attr{$1}
|
|
320
|
0 |
3980 |
unless defined $pt->{'Time'}
|
|
321
|
0 |
3980 |
unless defined $pt->{'DistanceMeters'}
|
|
322
|
0 |
3980 |
if ($pt->{'_noTime'} or $pt->{'_noDist'})
|
|
327
|
3980 |
0 |
unless $pt->{'_noDist'}
|
|
328
|
3980 |
0 |
unless ($pt->{'_noTime'})
|
|
330
|
3980 |
0 |
unless $pt->{'_noTime'}
|
|
332
|
0 |
3980 |
if $orig_time_string ne $pt->{'_time_iso8601'}
|
|
341
|
8350 |
11217 |
unless $attr =~ /[^A-Z]/
|
|
342
|
0 |
11217 |
unless $Geo::TCX::Trackpoint::Full::possible_attr{$attr}
|
|
343
|
0 |
11217 |
if @_
|
|
376
|
2 |
1055 |
if (defined $value)
|
|
377
|
0 |
2 |
unless $opts{'force'}
|
|
450
|
63 |
373 |
if (ref $_[0] and $_[0]->isa('DateTime::Duration')) { }
|
|
461
|
63 |
360 |
if (ref $_[0] and $_[0]->isa('DateTime::Duration')) { }
|
|
497
|
58 |
4666 |
if (defined $value)
|
|
498
|
0 |
58 |
unless $opts{'force'}
|
|
522
|
2 |
3 |
if (ref $_[0]) { }
|
|
|
1 |
2 |
elsif ($_[0] =~ /^(\d+)$/) { }
|
|
523
|
0 |
2 |
if ($_[0]->isa('DateTime')) { }
|
|
526
|
0 |
2 |
unless $_[0]->isa("Geo::TCX::Trackpoint")
|
|
545
|
397 |
841 |
$opts{'indent'} ? :
|
|
546
|
397 |
841 |
$opts{'indent'} ? :
|
|
547
|
1238 |
0 |
$opts{'n_tabs'} ? :
|
|
552
|
1237 |
1 |
if (defined $pt->LatitudeDegrees)
|
|
560
|
1023 |
215 |
if (defined $pt->HeartRateBpm)
|
|
563
|
0 |
1238 |
if (defined $pt->Cadence)
|
|
566
|
0 |
1238 |
if (defined $pt->SensorState)
|
|
577
|
3887 |
95 |
if ref $_[-1] and $_[-1]->isa("Geo::TCX::Trackpoint")
|
|
593
|
3933 |
95 |
if (ref $previous_pt)
|
|
594
|
0 |
3933 |
unless $previous_pt->isa("Geo::TCX::Trackpoint")
|
|
610
|
3933 |
954 |
if ref $_[-1] and $_[-1]->isa("Geo::TCX::Trackpoint")
|
|
613
|
905 |
3982 |
if (ref $time and $time->isa('DateTime')) { }
|
|
625
|
4028 |
859 |
unless (exists $pt->{'_time_elapsed'})
|
|
626
|
3933 |
95 |
if ($previous_pt) { }
|
|
637
|
4887 |
9774 |
if ($opts{'local'}) { }
|
|
652
|
3933 |
1639 |
if ref $_[-1] and $_[-1]->isa("Geo::TCX::Trackpoint")
|
|
656
|
5572 |
0 |
if defined $meters
|
|
660
|
4028 |
1544 |
unless (exists $pt->{'_distance_elapsed'})
|
|
661
|
3933 |
95 |
if ($previous_pt) { }
|