for my $e ($dom->find('structured-macro[name="include"]')->each) {
my $include = $e->find('page[ri:content-title$=.]')->[0];
DEBUG("include contents: < $include >");
my ($title, $space_key);
$include =~ /content-title="(?
[_a-zA-Z0-9\,\:\- ]+)"/;
$title = $+{title};
$include =~ /ri:space-key="(?[a-zA-Z]+)"?/;
$space_key = $+{space_key};
$space_key //= 'sp';
DEBUG("include extracted fields: < space: $space_key title: $title >");
my $cmd = qq[get-page-source --called '$title' --from 'AppNexus:$space_key'];
my $included_content = `$cmd`;
$included_content =~ s/^Source\n//;
$e->replace($included_content);
}