#
# Permission to use, copy, modify, distribute, and sell this software and its
# documentation for any purpose is hereby granted without fee, provided that
#
# Permission to use, copy, modify, distribute, and sell this software and its
# documentation for any purpose is hereby granted without fee, provided that
open (IN, "<$xml") || error ("$xml: $!");
while (<IN>) { $b .= $_; }
close IN;
open (IN, "<$xml") || error ("$xml: $!");
while (<IN>) { $b .= $_; }
close IN;