my $xml_text = do { local(@ARGV, $/) = 'myfile.xml'; <> };