if (@files !=0){
  foreach $file (@files) {
    $parser = XML::LibXML->new();
    $tree = $parser->parse_file($file);
    $root = $tree->getDocumentElement;
    @changes = $root->getElementsByTagName('change');
    foreach $change (@changes) {
      @classDetail = $change->getElementsByTagName('class');
      if (@classDetail !=0){	
        $className=$classDetail[0]->getAttribute('name');
        print "className= " .$className ."\n";
      }
    }
    undef ($parser)
  }
}
closedir(DIR);