for my $node ($xml->findnodes("//y:Trackpoint")) {
 for my $ch ($node->childNodes) {
  $time = norm_date($ch->textContent)-$epoch if $ch->nodeName =~ /Time/;
 }
 push @X,$time;
}