use strict;
use XML::Rules;

my $parser = XML::Rules->new(
	stripspaces => 7,
	rules => [
		'_default' => 'content',
		'Dev_Info' => sub {
			print "$_[1]->{dev_name}\t$_[1]->{configuration}\n";
			return;
		},
		'Device' => '',
	],
	start_rules => [
		'Hyper,RAID-5_Device,Back_End,Mirror_Set,Front_End,Product,Label,Flags,Capacity' => 'skip',
	],
);

$parser->parse(\*DATA);

__DATA__
<?xml version="1.0" standalone="yes" ?>
<SymCLI_ML>
...