##

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

##

##

$VAR1 = {
         'ref' => 
{
 'abc_sia_%version1.ref' => 
{
 'func' => [
            {
             'envname' => 'test01',
             'objectdir' => '/home/pv66',
             'base' => 'default_771'
            }
           ]       
}                  
};

##

##

$VAR1 = {

 'abc_sia_%version1.ref' => 
{
 'func' => [
            {
             'envname' => 'test01',
             'objectdir' => '/home/pv66',
             'base' => 'default_771'
            }
           ]       
}                  
};