use strict;
use XML::Rules;

my %data;
my $parser = XML::Rules->new(
	stripspaces => 7,
	rules => {
		_default => '',
		url => 'content',
		urlInfo => sub {
			my ($tag,$attr,$context,$parents) = @_;
			$data{ $attr->{url} } = $parents->[-2]{name}
		},
	}
);

$parser->parse(\*DATA);
use Data::Dumper;
print Dumper(\%data);

__DATA__
<authenticationReports>
<generatedTime>Tue Sep 29 07:07:34 PDT 2009</generatedTime>
...