@curl = ('/usr/local/bin/curl', '--silent', '-m', '120', '-d', $xml,
         'http://localhost/check.cgi');
open CURL, "-|", @curl;

@responsexml = <CURL>;
print @responsexml;