print '<div class=aside>';
s/\.?$/./, print "<p>$_</p>" for map { ref $_ ? @$_ : $_ || () }
$row->{description}, $row->{notes};
printf 'Resources: %s.', join(', ',
map { qq(<a href="$_->{url}">$_->{title}</a>) } @$_
print '<div class=aside>';
s/\.?$/./, print "<p>$_</p>" for map { ref $_ ? @$_ : $_ || () }
$row->{description}, $row->{notes};
printf 'Resources: %s.', join(', ',
map { qq(<a href="$_->{url}">$_->{title}</a>) } @$_