printf("<tr><th>%s{'%s'}</th><td>%s</td></tr>\n",
$var, $_, defined $$var{$_} ? $$var{$_} : "<i>no value</i>"
) for sort keys %$var;
printf("<tr><th>%s{'%s'}</th><td>%s</td></tr>\n",
$var, $_, defined $$var{$_} ? $$var{$_} : "<i>no value</i>"
) for sort keys %$var;