Select Code to Download

<nodes>
    <node name="ABC" id="1" ciType="null">
...
        </children>
    </node>
</nodes>

#!/usr/bin/perl
use strict;
...
            };
    
    }

$VAR1 = [
          {
...
          }
        ];