my $sesxp = XML::XPath->new(otherfilename => $SESXML);
print 'SESXML: ' . $xp . "\n";