use strict;
use warnings;
use XML::Simple;

my $str = <<EOL;
<opt class="java.beans.XMLDecoder" version="1.6.0-oem">
  <object class="java.util.HashSet">
    <void method="add" string="baseball" />
    <void method="add" string="football" />
  </object>
</opt>
EOL

my $ref = XMLin($str);
open FH, ">", "webcams.xml" or die ("open failed");
print FH XMLout($ref, 
  AttrIndent => 1,
  xmldecl => '<?xml version="1.0" encoding="UTF-8"?>');
close FH or die ("close failed");
__END__
<?xml version="1.0" encoding="UTF-8"?>
<opt class="java.beans.XMLDecoder"
     version="1.6.0-oem">
  <object class="java.util.HashSet">
    <void method="add"
          string="baseball" />
    <void method="add"
          string="football" />
  </object>
</opt>