Assumes prefix matches page names.
EscapeHTML $line;
my ($date, $subject) = split /[\t\n]/, $line;
$date =~ s/ \K/<small>/ and $date .= '</small>';
EscapeHTML $line;
my ($date, $subject) = split /[\t\n]/, $line;
$date =~ s/ \K/<small>/ and $date .= '</small>';
+ $subject =~ s{\A(\w+)(?=: )}{showlink($1, -e "$1.plp" && "/$1")}e;
say "<p><strong>Last update</strong>: $date $subject</p>";
}}
say "<p><strong>Last update</strong>: $date $subject</p>";
}}