X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/6e039227493aac52e7e7a31f4fb27a96e2c45353..5fd1d56a364c2ac5a2d03f788db3d35ebdcde4fc:/index.plp diff --git a/index.plp b/index.plp index 022a298..6909025 100644 --- a/index.plp +++ b/index.plp @@ -35,7 +35,9 @@ if (open my $log, '<', 'UPDATE') {{ EscapeHTML $line; my ($date, $subject) = split /[\t\n]/, $line; $date =~ s/ \K// and $date .= ''; - $subject =~ s{\A(\w+)(?=: )}{showlink($1, -e "$1.plp" && "/$1")}e; + $subject =~ s{\A (\w+) (?= (?:/\w+)* :\h )}{ + showlink($1, -e "$1.plp" && "/$1"); + }ex; say "

Last update: $date $subject

"; }}