Select Code to Download

//title[@lang='en']

Selects all the title elements that have an attribute named lang with 
+a value of 'en'

my @vol = $doc->findnodes(q {//Volume[@VolumeCategory="L"]});