+ my $alt = $name;
+ $name = "<q>$name</q>" if $name =~ s/\?$//;
+
+ printf '<figure%s>', $hidden && !exists $get{v} && ' hidden';
+ if ($img and -e ($img = "data/dieren/$img.jpg")) {
+ my $alt = -l $img && readlink($img) =~ s/\.jpg$//r;
+ if ($alt) {
+ $name .= " ($alt)";
+ }
+ else {
+ $alt = $name;
+ }
+ print "<figcaption>$name</figcaption>";