Select Code to Download

$VAR1 = {
          'Dev' : {
...
                        }
            }
    };

use XML::Simple;
...
$data = $xml->XMLin("/home/nager.xml");

print "$data->{Dev}->{VeCog}->{Operations}->{C}->{Value}\n";

A:1
B:10
C:100
D:1000