my $file;
 my $xml;
open($file, 'formal.xml');
{
local $/;
 $xml= <$file>;
}