perlintern: Include section headings for non-empties

For example, the "CV Handling" section in perlintern did not include the
introduction for it that appears in perlapi; just the elements.  It is
more convenient for the reader to have that short summary in this pod as
well.

Author: khwilliamson

autodoc.pl

@@ -2311,7 +2311,8 @@ ($destpod)
             delete $section_info->{X_tags};
         }
 
-        if ($podname eq $api) {
+        my $has_entries = $section_info && keys $section_info->%*;
+        if ($has_entries) {
             print $fh "\n", $valid_sections{$section_name}{header}, "\n"
                  if defined $valid_sections{$section_name}{header};
 
@@ -2323,7 +2324,7 @@ ($destpod)
             }
         }
 
-        if (! $section_info || ! keys $section_info->%*) {
+        if (! $has_entries) {
             my $pod_type = ($podname eq $api) ? "public" : "internal";
             print $fh "\nThere are currently no $pod_type API items in ",
                       $section_name, "\n";