my $doc = $xs1->XMLin($file, forcearray => 1, keyattr => {client_system => 'Customer Care'});

foreach my $key (keys (%{$doc->{client_system}})){
	if($key eq 'business_area') {
		print $doc->{client_system}[$key]->{component}[0]->{component_lib}[0]->{class_set}[0]->{base_class_set[0]->{interval}{'range'}, "\n";
	}
}