my $dom = XML::LibXML->load_xml(string => <<'XML');
  <$response->decoded_content/>
XML
  for my $node ($dom->findnodes('//drl[@connectionid]')) {
  print $node->getAttribute('connectionid');