perl: reinclude feature attributes

Broken since commit v1.11-14-gf14d687746 (2018-03-22)
[perl: wrap long source lines to 80 characters].

diff --git a/perl.plp b/perl.plp
index 16356213e554b02c8ac89f4c75ffe51c58ca936f..131291e0ffdf995521700ecb4a3fded5f7a7a053 100644 (file)
--- a/perl.plp
+++ b/perl.plp
@@ -53,7 +53,7 @@ for my $vernum (reverse sort keys %{$info}) {
                        if ($attr->{feature}) {
                                my $prefix = sprintf '<span title="%s">feature</span>',
                                        $attr->{feature};
-                               my $title = join ', ', $prefix, $title // ();
+                               $title = join ', ', $prefix, $title // ();
                        }
                        $desc .= sprintf ' <em class="ex">(%s)</em>', $title;
                }