X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/74c62db62374d809605edb4fb0e82ba852502ecb..0880539638400df47ab159dfd6f282cd46f9de09:/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

"; }}