my $nodes = $data->getElementsByTagName('function');

  my $n = $nodes->getLength;

  for (my $i = 0; $i < $n; $i++)
 {
   my $node = $nodes->item ($i);
   my $start = $node->getAttributeNode ("start");
     print $start->getValue . "\n";
 }