open FH, ">tt.html" or die "file could not be not created";
my $x= qq(<?xml version="1.0" encoding="utf-8" ?>
<Soap-ENV:Envelope>
 <Soap-ENV:Body>
  <CheckTrade>
   <tradeId>49214792</tradeId>
  </CheckTrade>
 </Soap-ENV:Body>
</Soap-ENV:Envelope>
); 

print FH "<table><tr><td>Message</td><td>$x</td></tr></table>;


##</code><code>##

________________________
Message   |    49214792
__________|_____________