Select Code to Download

<root>
  <ref name="abc_sia_%version1.ref%">
...
     base="default_771"/>
  </ref>
</root>

my $xml = new XML::Simple;
my $data = $xml->XMLin("/home/pv66", ForceArray => 1, KeyAttr => { ref
+ => "name"});
print Dumper ($data);

$VAR1 = {
         'ref' => 
...
           ]       
}                  
};

$VAR1 = {

...
           ]       
}                  
};