Select Code to Download

<?xml version="1.0" ?>
<tcf>
  <tweak name = "T1">
...
    <description>This should overwrite the old T2.</description>
  </tweak>
</tcf>

#!/usr/bin/perl

use strict;
...
print "TWIG:\n";
$twig->print;
print "\n";

$ ./twig_replace_test.pl 
TWEAK: <tweak name="T1"><description>D1</description></tweak> (Found 0
+ other parsed tweaks with the same name)
TWEAK: <tweak name="T2"><description>D2</description></tweak> (Found 0
+ other parsed tweaks with the same name)
...
    with
        <tweak name="T2"><description>This should overwrite the old T2
+.</description></tweak>
TWIG: