HTTP/1.1 sends headers back more, tolerate that

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@15587 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jbjohnso 2013-03-19 16:01:43 +00:00
parent 67787dad86
commit eda584a0f5

View File

@ -734,6 +734,7 @@ sub send_req {
if (grep (/<html>/, $response)) { # get a error message in the html
$rc = 3;
} elsif (grep (/<\?xml/, $response)) {
$response =~ s/.*?</</ms;
my $parser = XML::LibXML->new();
my $doc = $parser->parse_string($response);
if ($doc ) {