Select Code to Download

use XML::Twig;
use IO::Tee;
use feature 'say';
...
    <zdzblo>B</zdzblo>
  </trailer>
</batch>

_default_ for foo[[[<batch><header><foo>1</foo>]]]
_default_ for bar[[[<bar>2</bar>]]]
_default_ for baz[[[<baz>3</baz>]]]
...
_default_ for zdzblo[[[<zdzblo>B</zdzblo>]]]
_default_ for trailer[[[</trailer>]]]
_default_ for batch[[[</batch>]]]

_default_ for foo[[[<batch><header><foo>1</foo>]]]
_default_ for bar[[[<bar>2</bar>]]]
_default_ for baz[[[<baz>3</baz>]]]
...
_default_ for zdzblo[[[<zdzblo>B</zdzblo>]]]
_default_ for trailer[[[</trailer>]]]
_default_ for batch[[[</batch>]]]