if ($inline =~ /<valueTargetPair (.*)\/>/) {
   if ($inline =~ /value=\"(.*?)\" targetPo=\"(.*?)\"/) {
      my %theHash = {value=>$1, targetPo=>$2};
      push (@arry, \%theHash);
   }
}