my $parser = XML::Rules->new(
	stripspaces => 3,
	rules => {
		_default => '',
		Key => 'content',
		Value => 'content',
		KVPair => 'pass',
		SigData => sub {return '@keys' => $_[1]->{Key}, '@values' => $_[1]->{Value}},
		root => 'pass',
	},
);
my $data = $parser->parse(\*DATA);

use Data::Dumper;
print Dumper($data);