Select Code to Download

use XML::Rules;
my $parser = XML::Rules->new(
...

use Data::Dumper;
print Dumper($data->{address});

my $parser = XML::Rules->new(
    stripspaces => 3,
...
);

$parser->parse($XML);