use XML::XPath;

my $xp = XML::XPath->new(filename => 'filename');
my $nodeset = $xp->find('global/snmp/version');

print $_->string_value, "\n" for $nodeset->get_nodelist;