+ if (my $provided_by = $entry->{provided_by}) {
+ my $str = "<dt><a href=\"$pkg\">$pkg</a> ".
+ "</dt>\n <dd>virtual package provided by ".
+ join( ', ',map { "<a href=\"../$_\">$_</a>" } @$provided_by)."</dd>\n";
+ my $txt_str = "$pkg\tvirtual package provided by ".join(', ', @$provided_by)."\n";
+ print {$pages{$key}{virtual}{fh}} $str
+ or die "couldn't write to output file: $!";
+ }
+ next if $entry->is_virtual;