created by <a href="http://shiar.nl/" rel="author">Shiar</a> •
<a href="http://www.fsf.org/licensing/licenses/agpl-3.0.html"
title="Licensed under the GNU Affero General Public License, version 3"
- rel="license copyright">AGPLv3</a>
+ rel="license">AGPLv3</a>
EOT
say sprintf '• %.3fs', Time::HiRes::tv_interval($Time) if $Dev and $Time;
say '</p>';
sub showlink {
my ($title, $href, $selected) = @_;
return sprintf(
+ !$href ? '%s' :
$selected ? '<strong>%s</strong>' : '<a href="%2$s">%s</a>',
EscapeHTML($title), EscapeHTML($href)
);